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Bryan 
Davies looks 
at some 
updates, the 
Psion 3, and 
an unwell 
Thor. 


In issue II.9, 
Dilwyn Jones gave 
some advice on 
the use of the 
SERMouse Serial 
mouse kit - that 
you need to be 
careful not to hold 
down a mouse 
button when 
switching on the 
QL This applies to 
3-button mice 
which do not have 
a mouse-mode 
switch on them. 
There may be 
other variations on 
this theme, 
though. When 
used on a PC, my 
own Genius GM6 
mouse defaults to Mouse Systems 
mode (3-button) and will only oper- 
ate as a Microsoft Mouse (2-button) 
if (any) one of the three buttons is 
held down during the boot process. 
This caused sufficient annoyance 
to push me into buying another 
mouse, which has the 
Microsoft/Mouse Systems switch 
on it. 

The same issue has a letter from 
Ron Stewart, suggesting a fix for a 
problem which can occur with the 
Abacus Amend commana. This fix 
was demonstrated at our last local 
Quanta group meeting, and it cer- 
tainly seemed to work. There is no 
guarantee that making the patch 
he gives will not cause some other 
trouble, but it is definitely worth try- 


ing. 


File Finder 


In my review of File Finder (‘FiFi’) 


some months ago, | commented that 
a text string could not be located in a 
file created in Professional Publisher. 
The program writer replied that the 
reason for this is that the text was not 
in the file as text, but as bit-mapped 
images. This brings up a point that 
could trouble average users - when is 
text not text? My own understanding 
of how text is contained in DTP (or 


high-end WP) program files is condi- 
tioned by experience with other pro- 
grams, in which text does remain as 
“itself”. 

Programmers obviously see files dif- 
ferently from the way users see them; 
one looks at the file as a structure, the 
other sees it as an end-product some- 
thing that is readable as normal lan- 
guage on a piece of paper. In writing 
reviews, | look at programs as a user. 
What goes on internally, within a file, 
does not normally interest me. It is 
only when something goes wrong 
with a file that its internals need to be 
investigated. 


LineDesign 


Very soon after the initial release, 
Belgian software developers Progs 
have started supplying beta-test 
copies of version 2.00 of LineDesign 
for comment. As they promised earlier, 
they are working hard to improve 
areas of the program which fell short 
of the general program standard. They 
have not wasted any time bringing 
out important changes. 

The open way in which Progs speak 
of the difficulties of getting certain pro- 
gram functions to work acceptably will 
appeal to many users. Making the 
problems clear, and assuring users 
(and potential buyers) that fixes are in- 
hand, should reassure people for 
whom the program is a substantial 
investment. We have all suffered from 
programs which have not been suffi- 
ciently de-bugged before release, but 
we have rarely been given any infor- 
mation on what the programmers are 
doing to make their masterpieces 
usable. 

In this case, we even have printed 
instructions “especially for the beta- 
testers”! The first thing that is apparent 
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when 2.00 is fired up is that it is 
appreciably faster than 1.08 as 
reviewed in Il.9. All aspects seem to 
have benefitted. Loading documents 
for the review, another improvement 
became obvious - if a fount specified 
in the file being loaded is not current- 
ly available, you can select another 
from a drop-down list. Zooming into 
the displayed page is a simple 
process and quick with an average 
type of page. The maximum size to 
which the selected portion of the 
page can be blown up should satisfy 
most users. What will please anyone 
who has used bit-map editor pro- 
grams is the unchanging nature of 
the images as they are magnified; 
lines are not all absolutely straight, of 
course, but the image looks much 
the same whatever size it is dis- 
played at. 

Conventional scroll bars have 
replaced the toolbar arrows. A feature 
which has not yet been implemented 
is Insert Bitmap. This will allow QL 4- 
and 8-colour screen dumps to be 
inserted in current LineDesign pages. 
It is intended that other (non-QL?) for- 
mats will be supported by this com- 
mand in the future. The revised pro- 
gram deserves more detailed com- 
ment, but that will have to wait until 
some hours have been spent using 
the new and revised commands. 


Text87 Too 


As would be expected, changes 
have been made to Text87 to reflect 
the upgrading of LineDesign. There 
have also been a number of changes 
not related specifically to that pro- 
gram. The version numbers have 
been changing frequently in recent 
months, and may have gone beyond 
the 4.4 that appears to be current as 
of mid-November. 


Readers’ 
Letters 


Peter Hamill wrote an enthusiastic 
letter about LineDesign, which he is 
using to good effect on a newsletter 
for his local sailing club, The newslet- 
ter is a combination print, part done 
with Publishers’ Pack and part with 
Text87 alone. As with several “classic” 
DTP programs, you need to make the 
best use of two or three programs to 
get the results people expect these 


days - text from a WP program, perhaps graphics from a 
pukka drawing program, and the combination of text and 
graphics, partly from LineDesign and partly from multiple 
passes through the printer. This procedure may sound 
complex, but it need not be that bad. LineDesign obvious- 
ly is a drawing program, and the reason for suggesting 
the use of another graphics program in addition is that 
there are some good effects and “potted” images avail- 
able from non-QL programs, and it is tempting to make 
use of that which has already been created. LineDesign 
has the ability to import certain other types of file, such as 
those from Adobe Illustrator. It is highly desirable to have 
plenty of “spare” time, though, but that is what microcom- 
puting is all about, surely? 

One tip Peter passes on sounds novel - to copy an 
image onto the screen, using a mouse and LineDesign 
(or another graphics program), try tracing the image onto 
acetate sheet first, then place the sheet over the QL dis- 
play screen (it will stick there by static-electric attraction) 
and move the mouse pointer around the traced image on 
the acetate. 


Boats Laid Up! 


Had the whole newsletter not been available, a few 
phrases from it would have had me more than a little puz- 
zled. For example, “A total of 21 Squibs came together in 
clear blue skies” and “Squib Laying Up Supper’. The 
Squib is a class of small yacht, subject to race meetings 
and end-of-season suppers for the sailors when the boats 
are put to bed. In several ways, Peters use of the QL is 
typical of what a lot of home computer users do. If they all 
got results as good as he does, they would be quite 
happy. 

Changing tack a bit, Peter mentions the Psion 3, which 
impresses him. My own experience of it is very limited, 
confined to a recent session persuading one to transfer 
files to a “host” computer and print to a Canon Bubblejet 
printer. Without having touched one before, it didn't take 
me long to get the hang of both operations, despite the 
(usual) lack of accuracy in the instructions. File transfer 
took the longer time to sort out, purely because the pro- 
gram at the host end defaulted to a Baud rate of 19,200 
whereas the Series 3 offered no more than 9,600; the 
instructions did not mention this, as you can guess. 

It Is quite simple to use. Apart from the tiny keys, which 
make typing a pain, it has much to recommend it. Several 
programs can be loaded, and switching between them is 
easy; it is commendably nippy, and is a very convenient 
size for carrying around. The .DBF format of the database 
files in it was unacceptable to Archive, but a .LIS conver- 
sion of a database file loaded into Quill without trouble. 
From recent comment in magazines, it would seem that 
the latest Series 3 is much better than the one referred to 
here, and it should be possible to pick the older model 
up for a lower price. 


Help - Sick 
Thor 


John Wakefield asks for help on something which is 
outside my range. Maybe a reader can help? He has a 


Thor and feels that the keyboard is faulty. The symptoms 
are variable effects from the Alt, Ctrl and Shift keys. For 
instance, holding down either the Shift or Alt key for any 
length of time apparently causes them not to function, 
Ctrl-R will cause a reformat in Perfection, but a second 
tap of R (with the Ctrl key still held down) may cause that 
character to appear on the screen. On the other hand, the 
effect of holding the Ctrl, Shift and Alt keys down can per- 
sist some time after they are released. Is this deliberate, a 
software problem, a keyboard malfunction, or something 
quite different? 

There must be many QL users who believe that all Thor 
activity has died out. One such user contacted me as a 
result of talking to the supplier Transform (yes, they are 
still active, but not in QL matters). The recent bout 
between Kasparov and Short had aroused the chess- 
playing enthusiasm of his mates at work, but they had 
battered their Psion Chess cartridges to death. He wanted 
to know if one of the program files could be re-copied 
onto his cartridge. That in itself should be a simple job 
(but was not); the weak link in the chain is not the copy 
used for playing, though, but the master cartridge which 
has to be there for the program to start at all, and his 
master would not play ball. There is a floppy disk version 
of Chess around, and it does not seem to need a master, 
but whether or not this has been doctored to work on its 
own, | do not know. It is unlikely that Psion still support it 
(for the QL, anyway). 
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Open Channel is where you have the opportunity to voice your opinions in Sinclair QL World. Whether you want to ask for 
helo with a technical problem, provide somebody with an answer, or just sound off about something which bothers you, write 
to: Open Channel, QL World, The Blue Bam, Tew Lane, Wootton, Woodstock OX7 1HA 


Other 
Languages 


If you are interested in pro- 
gramming in Assembly, 
then check out Advanced 
QL Machine Code by 
A.Denning, The Sinclair 
Qdos Companion by 
APennel, QL User January 
and March 1986, ‘Of Disks 
and Drives’ by Colin Opie, 
and the recent SQLW series 
Systematic Machine Code 
Programming and 
Beginners’ Machine Code 
by Alan Bridewell. 

The strengths of 
SuperBasic have until 
recently kept C at bay. 
However, | feel the tide is 
changing in favour of C, 
especially since the release 
of the cheap PD C compiler 
(see QL World, March 1992, 
‘Inside the C68 compiler by 
Simon Goodwin) and PD C 
tutorial packages. The Cport 
utility (see QL World Dec 
1992 ‘Cport Review’ by 
Shirley Butler) has much to 
do with the emerging popu- 
larity of C as it is able to 
convert SuperBasic pro- 
grams into C code with the 
minimum effort. C has 
received more than its fair 
share of exposure in QL 
magazines with a number of 
product reviews and articles 
on using C - QL World 
September 1990, November 
1990 and February 1991, 
‘Programming in C’ by Andy 
Wright, and QL user 1985, ‘C 
series’ by A Denning. If you 
are interested in C, then 
check out your local library 
or order copies of the follow- 
ing articles (your library may 
have these in archive) - PCW 


June 1989, ‘ANSI C’ by N. 
Martin and PCW January to 
May 1985, Teach Yourself C’ 
by L Hampson. 
Alan Wilson 
Stenhousemuirr 


Good Dreams 


Following Tony Rushton’s 
very kind offer to create a 
printer driver for my Citizen 
Swift 24, | enclose photo- 
copies of the escape codes. 
| would be extremely grateful 
if you could pass these 
along to him with the SSAE 
and my thanks. 

Speaking of thanks, could 
you also thank Dilwyn Jones 
on my behalf for providing 
the Z88 information. | would 
have written earlier, but I'm 
afraid that I've been extreme- 
ly busy recently, working 
abroad and _— getting 
engaged among other 
things! It is nice to be 
involved in a community 
which is so helpful - | must 
confess that once | almost 
left the QL in favour of the 
Amiga, but now.!’m getting a 
PC with QXL card once 
funds are available (ie not for 
some time’). 

Lastly, would you let your 
readers know that my 
adventure game 
Dreamlands, formerly pub- 
lished by CGH Services, is 
now freely available as 
Charityware. | have sent 
Qubbesoft a copy which 
explains the concept in the 
Quill_doc file. The name of 
CGH still appears on the title 
screen but the game is now 
no longer a commercial one. 

Jean Yves Rouffiac 
London 
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Colour Stuck 


In QL World Vol 11.9 you 
published in Open Channel 
an interesting tio from Bruno 
Coativy on cursor colour 
change. | tried it immediate- 
ly on my JM-rom QL with 
Gold Card 2.23, Unfort- 
unately, it does not work, 
because it is not possible to 
poke the required colour 
mask into the address found 
by function “adresseS” (in 
my case $24A8). The con- 
tents of this address are 
changeless, and are set to 
the colour red! Having Bruno 
Coatiw’s idea in mind, | tried 
also to modify the original 
QL character definitions in 
Font 2, with the same nega- 
tive result. The investigated 
ram locations of the Gold 
Card ($24A8, $A530 
$A770) behave in like man- 
ner to the rom. Where or 
what is the reason for this? 

Dr. Vladislav Teply 
Prague 
Czech Republic 


Stuart Honeybail writes: 
The address $24A8 lies in 
the QLrom’s address space. 
This ram used by the current 
Gold Card is write-protected 
to prevent programs that 
attempt to write to the QL 
rom’s space from causing 
corruption. Earlier Gold 
Cards did not have this pro- 
tection, and so allowed 
writes to this space. 


All At Sea 


In Vol Il issue 7 (| think the 
July issue) you have a 
review of a naval battle 


game program, Fleet 
Tactical Command. As my 
employers may allow me to 
buy my now rather old-fash- 
ioned IBM PC 286, | would 
like to know where to get 
the serial lead mentioned, 
and how | would to connect 
the PC and the QL together? 
lan Marsh 

Sheffield 


For all information about 
FIC, talk to Dilwyn Jones at 
DJC (0248 354023). 
However, a good source of 
all leads and information 


about them is Tony 
Firshman at TF Services 
(0344 890986) 


You are right about [1.7 
being the July issue. The 
issue number is the number 
of the month Uanuary = 7, 
February = 2 and so on) We 
made a mistake in August 
and repeated II.7 on the 
cover, however, I8 is correct 
on the Contents page. 
Likewise, the first issue with 
the Volume/issue number 
system, in April, has (quite 
correctly) 114 on the cover, 
but (also correctly) “April 
1993” on the Contents page, 
to help people pick up the 
new system. 

We thought it would save 
our printers confusion, as 
some of the issues are rather 
loosely attached to their 
proper. months at the 
moment. But not everyone is 
happy - one reader thought 
that IL7 was the April issue! 
In our defence, the photo 
feature in QL Scene does 
say “5th June". We have a 
few grumbles when things 
are late, but not normally that 
they are two months early! 


Looking to Help 


The Royal National 
Institute for the Blind is seek- 
ing volunteers familiar with 
personal computer tech- 
nology to help look after 
customers on its Electronic 
Newspaper service. The 
Electronic Newspaper is a 
self-funding service provided 
by Electronic Text Network 
Associates (ETNA), a joint 
venture company led by 
RNIB. Using the ETNA ser- 
vice, blind and partially sight- 
ed people have indepen- 
dent access to a daily news- 
paper, something which 
many sighted people take 
for granted. 

The Electronic Newspaper 
consists of the text of The 
Guardian newspaper, trans- 
mitted each night via teletext 
Packet 31, which is received 
by the user on a convention- 
al TV aerial connected to a 
proprietary decoded board 
fitted into the users PC. The 
PC runs a TSR that decrypts 
the signal and stores the 
incoming files to the hard 
disk. When the user wishes 
to read the newspaper, the 
articles are read by synthetic 
speech, or on-screen by 
character magnification soft- 
ware, or by touch using a 
moving braille display (soft 
braille). 

Access to computers is 
becoming easier for blind 
and partially sighted people, 
thanks to recent improve- 
ments in synthetic speech 
devices, but unless they are 
familiar with the technology, 
some users may have diffi- 
culties installing the PC 
decoder card and software. 
The user can purchase the 
card and software from the 
RNIB, but to keep down 
costs, the RNIB would |ike to 
find volounteers in all parts 
of the UK familiar with PC 
technology who could help 
our customers with installa- 
tion and, where necessary, 
troubleshooting. 

The volunteer would be 
asked to visit the Customer 
when the decoder card and 
software are delivered, to 
help them fit it in their own 


PC. Once the system is up 
and running, the volunteer 
may be asked from time to 
time to visit the customer if 
there are any particular diffi- 
culties. Each volunteer 
would only be asked to look 
after one or two people; trav- 
elling expenses are avail- 
able. 

As some of your readers 
may know, we already have 
over 3,000 valuable volun- 
teer engineers looking after 
the servicing of RNIB Talking 
Book players. Many “servic- 
ing visits" lead to friendships, 
and with the Electronic 
Newspaper, there is the 
opportunity for the volunteer 
to demystify the PC for the 
user, and to learn abut com- 
puter access technology for 
blind people. 

If you would like further 
information about becoming 
an RNIB computer volunteer, 
please contact me at the fol- 
lowing address: 


Prospect House, 
Prospect St., Huddersfield 
HDi 2NU. Tel. 0484 


450982. Fax: 0484 450703. 
David Finlay-Maxwell 

PhD MIEE 

Roya! National Institute 

for the Blind. 


The RNIB are looking 
mainly for PC volunteers, but 
some QLers are PC users 
as well and others may 
know someone who would 
like to know about the 
Electronic Newspaper, or 
who needs similar assis- 
tance with a QL or related 
format 


New 
Generation 


| am not sure as to the 
possibility of obtaining a 
copy of Family Tree, that 
used to be advertised in the 
Microdrive Exchange. | typed 
it from the original issue 
(August 1985), and have 
continued to use it repeat- 
edly since, with the draw- 
back of having to print out 
individual family groups! | 
noticed that more recent 
copies have an extended 


family tree ability. AS our 
family reaches back to 
England beyond the eigh- 
teenth century, this facility 
would be a great help. The 
name of Cooper is of course 
linked to the old occupation 
of barrel-making, so it may 
go back a few centuries! If 
Family Tree is still available, 
could you plese let me 
know the price etc? 
Keith Cooper 
Morrinsville 
New Zealand 


| have had this letter for 
some time and correspond- 
ed with Keith Cooper. 
However as we never man- 
aged to regain our master 
copy of Family Tree, or make 
contact with author Andy 
Carmichael, and as there 
are many keen tracers of 
family trees still out there, ! 
thought | would draw atten- 
tion again to the newest ver- 
sion of Chris Boutal's QL 
Genealogist 3, available 
from Dilwyn Jones. The new 
version costs £60, but there 
are alternative versions at 
£30 and £12 as well. 


IL8 Or Not IL8? 
| read in QL World IL9 that 


some users have not 
receieved |I8 - watch out as 
QL World II.8 has on the 
cover page reported II.7! 
Instead the correct number 
is reported in the “Contents” 
page. Maybe some users 
have been fooled by this 
printing error! 
Davide Santachiara 
Ergon Developments 
Italy 


Despite all {Ve said, theyre 
not that easily baffled! There 
really was a batch of 11.8 
bound for Continental 
Europe that didn’t reach its 
destination, and Fran has 
been sending replacements. 


AArk! 


More information about 
the QL-generated picture of 
a Kingfisher, drawn by Dave 
Barker of Charvelsoft, now 
that it has made it on to last 
month's cover, The image 
(used here with Dave’s 
express permission) is avail- 
able on a public domain 
disk formerly distributed by 
CGH Services, and now by 
the West Midlands Quanta 
Sub-group disk library. 

Simon Goodwin 
West Midlands 


Editor's Notebook 


Our leader article this month is about artificial 
intelligence, and gives an experimental demon- 
stration program for the QL Dr. Steven Wilcox is 
an academic working in artifical intelligence, and 
a QLuser (a sign of real intelligence), so he 
knows the subject from both sides. 

This issue introduces the new slimmed-down 
QLWorld. Like most businesses that go into this 
euphemistically-termed operation, we are not 
happy about it, but, as the changes in our adver- 
tising layouts over the last few months make 
clear, the slow decline in the market and the 
pressure caused by the recession is affecting 
everyone who relies on the open marketplace. 
Oh for a bottle full of QL-using genies to do our 


bidding! 


Our reduced space makes it more important 
than ever to know what you, the readers, like and 
don't like each month. Don’t be shy - let us 


know. 


New Home for London Quanta 


The Quanta London Subgroup is back to regular meetings at a new venue in central 
London. 

Meetings will now be held on the second Sunday of each month, between 1pm and 
6pm, at St Aloysius’ Primary School, Phoenix Road, Euston, London NW1. 

Phoenix Road is at the Euston end of Eversholt St, close to Euston Underground, and 
10 minutes’ walk from Kings Cross and Euston Square undergrounds. Several buses 
pass nearby, and there is car parking in the area. 

The meetings are open to all interested in the QL Admission is £2 on the door to 
cover the cost of the Hall, and organiser Colin Murphy (071 383 0007) is looking for 
people to give talks and demonstrations on hardware or software. A few weeks’ notice 
of talk subjects is helpful, as is notice if you intend to bring hardware, so that they can 
arrange enough tables. 

Among regular members at the moment are Fred Toussi of Software 87, Jerry Davis of 


QPacer, and programmer Mark Knight. 


ALL 
FOR- 
MAIS 

DIARY 


Coming dates for the All Formats 
Computer Fair are: 

20 Nov London Sandown Park 
Racecourse 21 Nov Portsmouth 
Guildhall 27 Nov Haydock Park 
Racecourse, M6 J23 28 Brunel Centre, 
Temple Meads Station, Bristol 4 Dec 
Leicester De Montfort Hall, Granville 
Road 5 Dec North East: Washington 
Leisure Centre, District 1 11 Dec West 
Midlands National Motorcycle Centre, 
M42 J6 12 Dec Leeds University 
Sports Centre, Calverlely St. 18 Dec 
Edinburgh Adam House, Chambers 
St. 19 Dec Glasgow City Hall, 
Candleriggs CHRISTMAS BREAK 15 
Jan Haydock Park Racecourse, M6 
J23 16 Jan Brunel Centre, 
Templemeads Station, Bristol. 

The All Formats Fairs are going to 
many more venues now. Although you 
will not find QL traders at every one, 
they are good browsing places for 
multi-format users and general sup- 
plies. Check with suppliers whether 
they will be at a particular Fair. If you 
have far to travel phone All Formats 
0608 663820 to check arrangements 
haven't changed. 

Day tickets are £4; you can get up 
to 50 £1-off vouchers by sending an 
SAE to the organisers at: Maple Leaf, 
Stretton-on-Fosse, Moreton-in Marsh, 
Gloucestershire GL56 9Qx. 
Photocopies of these vouchers are 
OK. Admission is a flat £2 between 
2pm and 4pm. £1-off vouchers do not 
apply at these times. 


Miraculous 
Progress 


Miracle Systems came back from the QL 
show at St. Joris’ College, Eindhofen, on 30th 
October, well satisfied with their visit. The QXL 
Card software has now reached the stage 
where only the SBasic is to be completed, but 
Miracle are in a cagey mood about announc- 
ing which of their eagerly-awaited new prod- 
ucts will be the next to appear. 

Stuart Honeyball tells us: “We want to make 
sure that we do the new product that a lot of 
people want, and that we can support it prop- 
erly, and we can only support a certain amount 
of products at a time. So we don't want to 
announce time scales on new products yet. In 
a way | wish we hadn't announced the graph- 
ics card as early as we did, but we want some- 
thing really good and we are not going to 
compromise.” 

Miracle also have the services of student 
Benjamin Wikes to work on the SCSI interface 
while he is doing his sandwich course. 
Commenting on working standards among 
young engineers, Stuart said: “We find that 
whether people are enthusiastic or not is the 
most important thing’, a comment that many 
others will agree with. 

One of the challenges facing the graphics 
card is that much established QL software is 
written for the native QL graphics that the card 
is designed to go beyond. Programs written for 
the pointer environment can handle higher res- 
olutions, but within the QL community, Stuart 
says, when the time comes there will need to 
be some rewriting of software to make use of 
improved graphic modes, 

In line with their policy of committing their 
resources to current and new projects, Miracle 
are no longer marketing the ED drives which 
they introduced to help Gold Card users obtain 
reliable disk drives. The drives can now be 
obtained from Bill Richardson at WN 
Richardson (EEC) on 0753 887149. 
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TF SERVICES BRINGS OUT 
l@C BUS INTERFACES 


TFServices have designed two 
hardware interfaces based on 
the parallel and analogue |!2C bus 
chips used by the Minerva Mk. 2 
rom to run its clock and battery- 
backed ram. Each interface con- 
tains two !2C chips, each of which 
can have one of eight addresses 
(set with DIP switches). 

Power and signals are taken 
from the Minerva connector, and 
at least four interfaces can be 
powered without any external sup- 


ply. 

The TF package provides soft- 
ware to make reading and writing 
to the devices easy. 

I2C compatible hardware on the 
general market includes phone 
diallers, teletext chips, and radio 
and TV controllers. Minerva will not 
allow the use of microprocessors 
or other devices which need dual 
bus masters. 

More information next month, 
For enquiries, contact Tony 
Firshman at TF Services, Holly 
Corner, Priory Road, Chavey 
Down, Ascot, Berks SL5 8RL. 
See also Tony's ad. in this issue of 
QLWonrd. 


| | 


Simon 
Goodwin 
unveils eccen- 
tric SuperBasic 
to tame the 
Motorola 
68020, 68030 
and 68040 
processors. 


The new 32 bit proces- 
sors in Motorola's 68000 
family are upward-com- 
patible with their eight and 
16 bit predecessors, so 
they can run the same 
code, This means that 
Qdos users should be 
able to upgrade to the 
new chips and run their 
existing programs at high 
speed, 

Much of the 
extra perfor- 
mance of the 
new chips 
comes from 
speed-up Cir- 
cuits which 
did not 
appear in the 
original 68008 
and 68000. 
Some QL pro- 


problem in two ways - 
either by clearing the cache 
before you use the self- 
modifying code, or by turn- 
ing it off completely. The 
first approach gives better 
performance, but the sec- 
ond is more reliable, espe- 
cially if you do not know 
exactly when the cache is 
invalidated. 

The 68020 processor, 
used in the Thor 20 and 
Amiga 1200, has a 256 
byte code cache. The 
68030 adds a 256 byte 
cache for data, and the 
68040 expands both to 4K 
each, increasing the 
chance that required code 
or data will be available on- 
chip. 

The ‘memory manage- 
ment unit’, or MMU, makes 
an appearance in top of 
the range MC68030 and 


MC68040s, and the new 
LC68040. The MMU trans- 
lates addresses so that 
memory can be re-located 
without the need to copy 
the entire contents from 
one place to another, Qdos 
has no need of a memory 
management unit, and pro- 
gram performance is 
improved if you turn it off. 


Why 
SuperBasic? 


This month's column is a 
hybrid of SuperBasic and 
machine code. The pro- 
grams are in SuperBasic, 
yet they access the nitty- 
gritty inards of Motorola’s 
32 bit processors. | could 
have written the programs 
in an assembler - they gen- 
erate a small machine- 


REMark 68040 MMU and CACHE control extensions 
REMark SuperBasic in Action, 


DEFine PROCedure CACHE(d,c} 
Local x 

IF UNSET(d) THEN a=] 

IF UNSET(c) THEN c=1 
x-ALCHP( 20) 


Simon N Goodwin 


grams which 
have worked 
reliably for 
years fall foul 
of the new 
hardware, So 
QXL, ST and 
Amiga emula- 
tor users 
need to be 
able to turn 
features on 
and off. These 
SuperBasic programs do that job by updating 
Motorola's processor control registers. 

For instance, the ‘code cache’ stores instruc- 
tions locally inside the processor. This saves 
time, but can cause erroneous results if you 
run programs that patch their own code, like 
Speculator, Lightning and the original Turbo 
Toolkit implementation of SEARCH. MEMORY. 


Cache Control 


The processor may carry on running the 
original code from the cache, ignoring the 
new version In memory. You can avoid this 


POKE_W x,20032:REMark SV mode 

POKE,W x+2,8764:REMark Load Dl 

POKE_W x+4,-32768*(d<>0):REMark Data 

POKE_W x+6,-32768*(c<>0):REMark Code 

POKE_W x+8,BIN("0100111001111011"):REMark MOVEC 
POKE_W x+10,HEX("1002"):REMark Move Dl to CCR 
POKE_W x+12,636:REMark User mode 

POKE_W x+14,-9985 

POKE_W x+16,HEX("7000") 

POKE_W x+18,HEX("4E75") 

CALL x 

RECHP x:REMark Phew 

END DEFine CACHE 


| 


| 


| 


DEFine PROCedure MMU_OFF 

Local «x 

x=ALCHP( 20) 

POKE_W x,20032:REMark SV mode 

POKE_W x+2,8764:REMark Load D1 

POKE_L x+4,0:REMark Disable MMU 

POKE_W x+8,BIN("0100111001111011"):REMark MOVEC 
POKE_W x+10,HEX("1003"):REMark Move D1 to TCR 
POKE_W x+12,636:REMark User mode 

POKE_W x+14,-9985 

POKE_W x+16,HEX("7000") 

POKE_W x+18,HEX("4E75") 

CALL x 

RECHP x 

END DEFine MMU OFF 


| Se See Sc i 


] 
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code routine as they work - 
but it was more sensible to 
develop them in 
SuperBasic. 

The programs use the 
MOVEC instruction, which 
was introduced for the 
68010 processor and later 
models. MOVEC allows 
access to special ‘control 
registers which do not 
appear in the earlier 68008 
used in the QL, nor the 
68000 of Amiga, ST, Thor 
XVI and Gold Card. Current 
QL assemblers do not 
recognise the MOVEC 
mnemonic, although it can 
be entered as a data word 
if you know the right code. 

Recently | had the 
chance to try out Amiga 
Qdos on the EC68030 and 
MC68040 processors, and | 
wanted to use MOVEC to 
configure the chips. Within 
a few minutes | had a work- 
ing SuperBasic program to 
generate and call the nec- 
essary code. 

lf you are developing a 
large assembler program it 
is best to include the 
MOVEC routine there, but if 
all you want is a way to 
switch the special features 
of your processor, there's 
really no need to leave 
SuperBasic. 

The SuperBasic version 
is ideal for experimentation 
because you can edit any 
part and try out the change 
straight away. Once a 
skeleton routine is working 
you can tweak it to use any 
of the 680X0 control regis- 
ters. 

| started with a single pro- 
cedure to switch the 68040 
caches on and off. | only 
needed to change a cou- 
ple of values to gain control 
of the Memory 
Management Unit, and 
then all the special control 
registers of the 68030. 


The listings 


Listing one is for the 
68040, including the EC 
and LC versions. There is 
no point in using the 
MMU_OFF command on 
an EC68040 board such as 


the QXL, as EC 
chips have no 
MMU. 

The listing 
implements 
two com- 
mands: 
MMU_OFF and 
CACHE. 
CACHE takes 
two optional 
parameters, 
which control 
the data and 
code cache 
respectively. 
Lines 150 and 


REMark 68030 cache control commands, version 1.1, 


15-11-93 


REMark Simon N Goodwin, Andreas Rudolph, Davide Santachiara 


DEFine PROCedure MOVECC(op} 
Local x 
x=ALCHP( 20} 


POKE_W x,20032:REMark SV mode 
POKE_W x+2,8764:REMark Load D1 


POKE_L x+6,0p 


POKF. W x+8,BIN("0100111001111011"):REMark MOVEC 
POKE_W x+10,HEX("1002"):REMark Mave Dl to CCR 


POKE_W x+12,636:REMark User mode 


POKE_W x+14,-9985 
POKE_W x+16,HEX("7000") 
POKE_W x+18,HEX("4E75") 
CALI, x 


160 use the 
DIY = Toolkit 
UNSET func- 
tion to check if 
parameters 
were supplied, 
and set them 
to one other- 
wise. If you 
lack UNSET, 
from DIY 
Toolkit Volume 
P, you should 
miss out those 
lines, and both 
parameters 
MUST be sup- 
plied. 

By default 
CACHE turns 
both caches 
on; CACHE 0 
disables the 
data cache and enables 
the code cache. CACHE 1,0 
enables only the data 
cache, and cures most 
problems with self-modify- 
ing code. CACHE 0,0 is the 
slowest and most compati- 
ble option. 

The POKEs store code in 
a 20 byte buffer on the 
common heap. The first 
word, 20082, is the 680X0 
code for TRAP #0, and 
selects Supervisor mode on 
a Qdos system. This is nec- 
essary because the 
MOVEC instruction is ‘privi- 
leged’ and cannot be exe- 
cuted in the normal ‘user’ 
mode, 

The next word, 8764 in 
decimal, is the code to load 
the subsequent long word 
value into register D1. Lines 
190 and 200 check the 
parameters and store - 
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RECHP x 
END DEFine MOVECC 


DEFine PROCedure DCACHE_ START 
MOVECC HEX("3911"):REMark Both on, 
END DEFine DCACHE_START 


DEFine PROCedure CCACHE_START 
MOVECC HEX("3119"):REMark Both on, 
END DEFine CCACHE_START 


DEFine PROCedure CACHES OFF 
MOVECC HEX("2808"):REMark Everything off 
END DEFine CACHES_OFF 


DEFine PROCedure DCACHE_ONLY 
MOVECC HEX("3908"):REMark Data on, 
END DEFine DCACHE_ONLY 


DEFine PROCedure CUCACHE ONLY 
MOVECC HEX("2819"}:REMark Code on, 
END DEFine CCACHE_ONLY 


32768 or zero in subse- 
quent words, depending on 
the parameter values. The 
68040 Cache Controls only 
use one bit, the most signif 
icant in each word, If this is 
set the cache is turned on. 
-32768 corresponds to 
1000 0000 0000 0000 in 
binary, or 8000 in hexadeci- 
mal; it easy to see how 
only the top bit is used in 
these values. 


Motorola Op- 
code 


The next instruction is the 
MOVEC op-code, which 
never appears in QL code, 
so | got the pattern from the 
Motorola Programmers 
Reference Manual, which 
expresses op-codes in 
binary. | could have con- 


clear 


clear 


clear 


clear 


verted it, but there's little 
point in doing so, and run- 
ning the risk of error, when | 
can type the binary directly 
into SuperBasic and evalu- 
ate it with the BIN function. 

MOVEC is always fol- 
lowed by a second word, 
indicating the source and 
destination registers. In this 
case the most appropriate 
base is hexadecimal; the 
first four bits of the word 
contain the register num- 
ber, 0 to 7 for DO to D7, or 8 
to F for AO to A7. 

The remaining bits select 
a control register; 002 signi- 
fies the Cache Control 
Register, and O03 the 
Translation Controller. 
There are a few other pos- 
sibilities, which depend on 
your choice of processor, 
for instance 801 is the 
Vector Base Register, which 


Se ee 


allows reset, interrupt and 
trap vectors to be re-locat- 
ed to an address other 
than zero, To find out more, 
consult the Motorola manu- 
al for your processor. 

The next two words return 
the processor to user 
mode, once the privileged 
MOVEC has been done. 
The hexadecimal 7000 op- 

; code sets register DO to 
zero. This is one of the few 
68000 instructions that’s 
easy to assemble by hand. 
The seven indicates 
MOVEQ, the second hex 
digit is the register number 
times two, so 74 would 
move a value to D2, The 
last byte is the value to be 
moved, so 7608 is the code 
for MOVEQ #8,D3. Easy! 

The last instruction is 
4E75 in hex, “Nu” in Ascii, 
and RTS in mnemonic 


assembly code. It marks 
the end of the code and 
returns control to the caller 
- SuperBasic’s CALL in this 
case. The final step Is to 
deallocate the buffer with 


RECHP. 

MMU_OFF needs no 
parameters. The bulk of the 
code resembles that for 
CACHE. A sequence of 20 
bytes is stored and then 
called, but in this case the 
code clears TC, the 
Translation Control register. 


68030 Range 


Listing two is for the 
68030 range, tested on an 
Amiga 4000/EC 030. The 
030 uses a different control 
register format, with extra 
bits to clear all or part of 
either cache, so you can't 
just use the 68040 version. 

The listing implements 
five commands: 
CACHE_OFF, which works 
like CACHE 0,0 on the 
68040; DCACHE_ONLY, like 
CACHE 1,0, and 
CCACHE_ONLY, which 
turns on the code cache 
but not the data one. 

The remaining com- 
mands leave both caches 


on, but clear one or other 
so new memory contents 


are recognised. 
CCACHE_START clears the 
code cache, while 


DCACHE_START does the 
same for data. All five pro- 
cedures call MOVECC, 
which sets up the bulk of 
the MOVEC code and stuffs 
a parameter into the low 
word of D1. 


Conversions 


The program uses base- 
conversion functions HEX 
and BIN from Toolkit 2. The 
HEX function also appears 
in Mark J Swifts PD Toolkit. 
lf your Super-QL lacks these 
functions you can replace 
the values with their deci- 
mal equivalents, but this 
will make them more diffi- 
cult to change, particularly 
in the case of BIN, where 
each binary digit has a 
special significance to the 
processor. 

The generated code is 


stored in a temporary area 
of memory allocated on the 
common heap. The pro- 
gram uses the Toolkit 2 
function ALCHP to allocate 
memory, and RECHP to 
discard it after use. If you 
lack Toolkit 2 you may use 
either the eponymous PD 
Toolkit functions, or ALLO- 
CATION and DEALLOCATE 
from Turbo Toolkit, or 
RESERVE and DISCARD 
from DIY Toolkit Volume H. 


This is not a typical 
SuperBasic in Action pro- 
ject, but it does show the 
sort of low-level access that 
is possible with POKE and 
CALL Next month | shall be 
back with more convention- 
al SuperBasic program- 
ming. In the meantime | 
hope 32 bit Qdos users 
find these little procedures 
useful, and welcome sug- 
gestions for future columns. 
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BlackKnight - the first mouse-driven Chess program! 

Yes, here it is - chess for the Pointer Environment! Moveable, runs on any dis- 
play resolution! SOOO moves opening llorary, demo made, setup, change 
sides, load and save game, hint, scrollable move-history etc, 10 Levels of diffi- 
culty, giving the computer between 5 seconds to | hour time to think 


typeset93-ESC/P2 NEV! 

Dedicated text87 printer drivers for all EPSON printers 
with ESCIP2 including the new Stylus 800. Supports the 
scalabie fonts, special characters and block graphics 
for drawing borders etc DM 69,90 


QMAKE NEW! 
Pointer-drven Make program for the GST/Quanta 
Assembler package. Very comfortable, with many 
options including liorary-buliding. DM 44,90 

NEW! 
The Oracle - an ancient tactic-puzzler. You don't have 
to be fast but clever Fill different ties into a field, but 
there are various rules now to do it If you can place all 
the tiles you get a bonus - try to obey special rules 
Every garne is different, you'll never be bored. Features: 
high-score table, hints for the next move etc DM 39,90 


QD Vercion 5 - Very comfortable Editor for the Pointer 
Environment now with Help System! (V5.16] DM !25,- 
Upgrade from QD V4 iretum master disk) DM 30,- 


HyperHELP for SuperBASIC 

Instant help in SuperBASIC! It displays o list of 
SuperBASIC Procedures, functions and keywords cur- 
rently existing in your machine. Simply click on the name 
and you get extensive help [English or German]. The 
nelp flas can be updated with any editor, QD, Quill, 
Text8/ oc that you can update and add remarks 
whenew 6 vou want DOM 49,- 


QMenu - the Menu Extansion. QMenu is an interface 
with pre-defined menus le.g multhcolumn file-selectsim- 
Pie-choice boxes, select from Ists), The menus can be 
used from SuperBASIC, machine code and other lan- 
guages New characterselect menu. v4.16] DM 39,90 
Update with new manual DM 16,- 


Postage and package [Europel DM 15,-lif total value of goods is up to DM 50,- then anty DM.9,-} 
\Qverseas) as before, but add DM 8,- per additional tern. All prices incl. 15% VAT. lean be deducted for orders from non-EEC. j 


BlackKnight even thinks when its your tum DM 119,90 


NEW! 


The Lonely Joker Version 2! 

Now six different games in onel Another three, even more complex patiences 
have been added to the existing three: Spine, Crapaud & Four-in-a-Handltwo 
of them work with two packs of cards) More optionsidifferent pattems for the 
reverse side of the cards|, high-scores, moveable window for hires screens 


etc DM 59,- (double fun-haif the price! DM 29,- NEW! 


QSpread - the only Spreadsheet program for the Pointer Environment 
Completely mause and/or keyboard-controllablel Maximum 32768 ces, 
where, for example, 146000 cells need about 400kBytes. Macro functions. 
tasy, quick and comfortable block handling and entry. Many additional func- 
tions, which belong to today’s standard-equipment: Help, Button, use of the 
Scrap. The current version adds missing features and more, eg. cell-reference- 
adjustment, echo, IF and comparisons,toolbar, time & date functions [VJ 22} 
QSpread with comprehensive manual DM 169,- Update with new manu- 
al (useful if old version ls <1,.20] DM 16,- QSpread Demo Version - send 3 
Intamnational Reply Coupons if ordered alone, otherwise enclose a spare disc 
with an order or update and tt is freel 


QL Hardware & Spares 


FLP/RAM Level 2 device drivers for SuperQBoard DM 56,- 
FLP/RAM Level 2 device drivers for TrumpCard DM 56,- 
SER Mouse software driver DM 40,- 
SER Mouse Package (mouse,adaptor & drived DM 87,- 
ZX8301 OM 19,90 
7ZX8302 DM 17,90 
QL Keybdoord membrane DM 28,- 2 mem- 
branes DM SO,- 
EPROM 27128 DM 5,- 
SIMM 256k x 8 DM 3,50 


countries). EBJOE. Cheques in DM, z's, Eurochaques and Credit Cords accepted, 


QL-Emulator for ATARI 
QVME - High-Res QL-Emulator for ATARI 
Mega STE and ATARI TT DM 695, 
E-nit Emulator Software [E34] DM 49,- 
E-ntt Update with new manual DM 14,- 
QlL-Emulator Brochure OM 13,- 
Medium for SyQuest 44MB DM 139, 


QDOS Reference Manual DM 89,9 
FIA DM 49,9 
QPTR OM 92,- 
Qsup DM 79,9 
Qa DM 69,9 
Thing & EPROM Manager DM 615 
EasyPTR Port 2 DM 89,- 
Part 2 Di 

44,- Part 3 DM 49,- 
DotaDesign V3 DM 149, 
SYSTEM OM 80,- 
QDesign Ii DM 150, 
Vectdit DM 60,- 

Games 

Diamonds DM 35,9 
BrainSmasher DM 45,9 
Arcanoid DM 35,9 
Firebirds DM 35,9 
SuperGamesPack DM 90,- 
@Shang DM 45,9 
Merry Christmas & 
Happy New Year! 


ERINSO= 


French QL 


Group QL Contact 


France are hold- 
ing their Annual 
General Meeting 
in Paris on 
Sunday 5th 
December. 
Contact Jean 
Louis Dianoux, 
22 Ave. Lenine, 
93230 
Romaineville, 
France. 


Starting With The Prolog 


Grange Technology of Didcot have introduced a new high performance implementa- 
tion of Prolog for the QL GT-Prolog can be used on any QL with 512K or more of 
memory. Combining speed with low memory overhead, the program provides an inter- 
active development environment supporting incremental compilation and debugging of 
Prolog applications. 

GT-Prolog is a full implementation of the Edinburgh dialect used widely in industry 
and education, and as the basic standard referred to by the British Standards Institute 
and International Standards Organisation. This implementation is also highly compati- 
ble with other major Prolog systems, giving immediate access to existing application 
code, documentation and training material, 

GT-Prolog features a full range of data types and gives transparent access to optimi- 
sation techniques including In-line Arithmetic Evaluation and automatic Garbage 
Collection of code and data. It is also one of the first implementations to support a fully 
logical Prolog database. It provides explicit control of memory allocation, allowing pro- 
grams up to 16 megabytes. Execution speed measured using Naive Reverse exceeds 
5K LIPS (logical instructions per second) on a 16 MHz Gold Card. 

The associated Workbench gives a powerful integrated toolset for code development, 
with a fast incremental compiler, a multi-port debugger on the Byrd model and a 
source code model, all employing a menu/dialogue user interface. The Workbench is 
implemented in Prolog using the same 130+ family of library predicates which provide 
user's programs with full access to Qdos facilities. 

Prolog has gained widespread use in symbolic processing and antificial intelligence, 
and increasingly in less specialised applications. The GT-Prolog package includes soft- 
ware on disk, and an 150-page A% User Guide and Manual. The single-user price is 
£89.85 inclusive of VAT and carriage. 

For more information contact Graham Thwaltes, Grange Technology Ltd., 
Rosebank, Stream Road, Upton, Didcot, Oxon OX11 9JG. Tel. 0235 851818. 


Ergon make prices simpler 


Ergon Developments in Italy have altered their pricings - to include all post and packing and bank 
charges. This will be gladly received by users who had to keep adding up the noughts on the Lire 
prices! As well as the arithmetic boon, all Ergon’s manuals have been revised and extended, and have 
tutorials with many step-by-step examples, and are also laser printed for extra clarity. Existing Ergon 
customers who would like the revised manuals should contact Ergon for information. 

Ergon's DEA Intelligent Disassembler is now into version +3, with interactive machine code decod- 
ing and a new 52-page manual. The cost is £28. MasterBasic 1.43 costs £22, Q-Library Manager 2.11 
is £18, Ergon Floppy Disk Utilities is £18 (this is version 1.13, with disk utilities for Gold Card High 
Density and Extra Density disk users, allowing a format of 5% extra capacity, +160 kilobytes on ED 
disks); Open World is £18 and Music Manager is £12. 

On the Spectrum Emulator front, both ZM/hT (which runs at full ZX speed on a Gold Card QL, as 
well as a reasonable speed on standard QLs) and ZM/128 now have 3-channel sound-chip emulation 
through the QL beeper, ZM/hT is now up to +1 while ZN/2 and ZM/3 have been upgraded to /hT 
supervisor level, +3. ZM/ACcessories now also include Tapefile to Soeculator conversion in both direc- 
tions, with a new 90+ page manual. Emulator prices are: Bargain package (ZM/nT,ZM/128 public 
domain versions + ZM/AC manual, £20; Budget package - as previously, plus ZM/2 and ZM/3 £30; 
Professional package - budget package plus ZM/nT £42. ZM/128 can be added to any of these for an 
extra £10. 

For the updated Ergon Demo Disk, with PD or demo versions of most of these programs, either 
send 6 IRCs (international reply coupons) to Ergon, or apply to your nearest Public Domain dealer 
(Qubbesoft or SJPD in the UK). There is also a special Spectrum emulator PC disk with ZM/nT and 
ZM/128 PD and some games and shareware. 

Contact Ergon at: Davide Santachiara, Via Emilio De Marchi 2, 42100 Reggio Emilia, Italy. Tel. 
(from UK) 010 39 522 70409. Please make payments with orders out to Davide Santachiara. 


SQLUG are holding a workshop in Edinburgh on Saturday 12 February 1994. For details get in 
touch with Alan Pemberton, 68 Lingerwocd Road, Newtongrange, Nidlotian EH22 4QQ. 
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Simon Goodwin tack- 
les serial mouse 
interrupts with 
68000 assembly lan- 
guage. 


is issue completes the 

source listing for the DIY 

Toolkit mouse extensions, 

and includes full assembled 

code to suit PC Serial mice with three 

buttons. 

| shall explain the exact format of 

information sent by the mouse, and 

show how it is converted into stan- 

dard pixel co-ordinates and button 

signals which can easily be read from 
SuperBasic. 


Assembly Code 


Listing One completes version 1.6 
of the DIY mouse handler, with code 
for the remaining SuperBasic com- 
mands and the interrupt driven han- 
dlers that read signals from the 
mouse and store them for your pro- 
gram to read. 

The first section of the assembly 
listing implements four new 
SuperBasic commands, discussed 
last month. The code is very straight-forward as they all work 
the same way, reading two integer parameters with the 
CAGTLIN vector and storing them among the mouse driver's 
own variables. 

Qdos calls its polled interrupt handlers fifty times a sec- 
ond, unless interrupts are temporarily prevented by network, 
disk or microdrive accesses which demand the processor's 
full attention. 

The DIY Mouse handler is labelled SERVER, and comes 
after the code for the commands. It starts by checking to see 
if the serial port is in use. If not, it retums at once. 

Otherwise it reads bytes from the serial input queue until 
there are no more ieft After processing each byte the han- 
dler returns to NEXT_BYTE to pick up another. Address reg- 
isters Al, A2 and A4 are set outside the loop and not modi- 
fied thereafter, to save time when processing several bytes at 
once. 


Variables 


Qdos sets register A3 to point eight bytes before the inter- 
rupt linkage when any interrupt handler is called. The LEAL 
instruction in my code points A4 at the variables used by the 
mouse driver, so later lines can find them easily from their 
offsets. 

The Table shows the variables and their meanings. 
Variables 10 to 13 are only used in the version of the handler 
with keyboard emulation. Each variable is a word, normally 
an integer in the range 0 to 32,767. 

The serial |D occupies two words; the first is the channel 


tag, and the second is the 
number in the Qdos chan- 
nel table. Both are zero if the 
channel was already open 
when the PTR_ON com- 
mand was issued. 

The eighth word holds a 
byte value, corresponding to 
the SYNCH% _ function, 
which cycles from 0 to 3 or 
5 as each byte of the mouse 
message is received and 
checked. The other byte in 
this word is only used in the 
Microsoft two-button version, 
when it stores the first byte 
of each message so that it 
can be used to extend the 
range of the X and Y delta 
bytes. 

You can read some of 
these variables directly from 
SuperBasic extensions. For 
instance PTR_X% and 
PTR_Y% read LATEST_X 
and LATEST_Y respectively, 
and BUTTON% reads BUT- 
TON_BITS. 

The next section of the 
code differs wildly depend- 
ing on the type of mouse. 
Mouse Systems and 
Microsoft cannot aggree on 
whether rising co-ordinates 
indicate movement up or 
down, so the three-button 
code SUBTRACTS incoming 
moves from the current posi- 
tion, while the two button 
variant ADDS them. 

The code variations 
ensure that the result of a 
move is the same to 
SuperBasic, regardless of 
the model. If you represent 
the mouse position with a 
pointer drawn with pixel co- 
ordinates on the screen, 
mouse movements shift the 
pointer the same way - as 
long as you have the but- 
tons pointing away from you 
and towards the screen. 

Thankfully both firms 
agreed that values should 
ascend from left to right, but 
even that may confuse 
Arabic and Hebrew writers, 
who scan the opposite way 
- as digits are still written in 
arithmetic, Standards are 
tricky things. 

The two button mouse 
moves the button bits to the 
right place with a shift and 
an OR instruction, but this 


would be more complicated 
for three buttons, especially 
as they do not come in the 
standard order we want to 
hold them in BUTTON_BITS. 

The program uses a small 
table, labelled 
BUTTON_CODE, to translate 
the three incoming bits into 
a BUTTON% value. The bits 
are inverted as well as shuf 
fled, as Mouse Systems set 
a bit to one UNLESS the cor- 


responding button is 
pressed, 
Tables are wonderful 


things, and can often do 
several jobs at once in pro- 
gramming. They are also 
easier to test, modify and 
prove correct than algo- 
rithms. If your program 
needs to transform one 
short pattern of bits into 
another, it's probably best, 
and almost always fastest, to 
use a table. 


Loose Buttons 


| should explain that the 
buttons are numbered the 
same way regardless of how 
many there are. The bits are 
in different places depend- 
ing on the type of mouse, 
but the DIY Toolkit mouse 
driver hides such differences 
from the programmer. 

As far as SuperBasic is 
concerned, the leftmost but- 
ton is button one and the 
right. button is button two. If 
both buttons are pressed, 
BUTTON%(0) returns three. 
The middle button only 
appears on a Mouse 
Systems mouse. Contrary to 
my last article, this is button 
three, ignored in Microsoft 
mouse mode. If this button 
is pressed it adds four to the 
result of the BUTTON%(0} 
function. 

You can use this function 
to derive a QL Mode 8 
colour, between zero and 
seven, from the combination 
of buttons held down as the 
mouse moves. This soon 
gets tiring if you're trying to 
draw a multi-coloured pic- 
ture, so it’s better to show 
the colours in a reserved 
area of screen and let the 
user select them by pointing 
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+o; WOREB BTY TOOLKIT - ASSEMBLY CODE MOUSE/POINTER DRIVER 
* Links SuperBASIC to a PC serial mouse; source listing part 2 
* Suits Mouse Systems 3 button and Microsoft 2 button rodents 


* Version 1.6, © Copyright November 1993, by Simon N Goodwin. 


* PTR MAX, PTR INC, PIR POS etc. share most of their code 
* They differ anly in the address for the stored value in A4 


point inc bsr.s find_pos 
addg.]  #step_x,a4 Skip first four co-ordinates 
bra.s setwords 
* 
point box lea.] 16(a3),a3 Ignore first two parameters 
empa.|  a3,a5 
bhi.s bad_param Error if A3>A5 
” 
point max bsr.s f ind_pos 
addg.1 #limit_x,a4 Skip first two co-ordinates 
bra.s setwards 
4 
paint at bsr.s find pos 
setwards movea.w S1ll2.w,a2 Vector gets words 
jsr (a2) 
bne.s bad exit 
subq.w -#2,d3 Test for two parameters 
bne.s bad_param Reject otherwise 
move.w Of{al,a6.1),d1 Check X 
bmi.s bad_param 
swap dl Move X value ta high word 
move.w  2(al,a6.1),di Check ¥ 
bmi. s bad param 
move, | d1,{a4} Store checked value 
exit. rts Return zero DO error code 
* 
* This is the clever bit the MS/PC mouse interrupt server 
* 
server move.] ser_pointer{a6),d0 
beq.s exit 
movea.| d0,a2 Find SER2 input queue 
move.w $£2.w,al 16,.Q0UT vector 
jea.] &+prefix(a3),a4 Find variables 
next byte jsr (al) 
bne.s exit Nothing to process now 


333333333333 33333333333333333333333333333333333333333333333 


ifeq buttons-3 
ext w dl 


addq.b #1, synchro(a4) Count bytes 1 to 5 
move.b  synchro(a4),d0 

subg.b = #1, d0 Use 0 to 4 internally 
beq.s button test 

btst 70,d0 Is this a ¥ delta? 
bne.s x byte No, it’s an easy X 


Process the third and fifth bytes, the Y delta’s 


y byte move,w latest y(a4),d2 
Sub. w di ,d2 
bmi.s clear yout Limit minimum to zero 
move .W limit y(a4),d} 
cmp .w di ,d2 
bls.s in_yrange 
move.w d1,de Set current Y to }imit 
in.yrange move,w d2, latest y(a4) 
bra.s check cycle 
clear yout clr.w latest_y(a4} 
check_cycle subq.b  #4,d0 Is this the fifth byte? 
bne.s next byte 
clear sync clr.b synchra(a4) Await next sequence start 
bra.s next_byte 


* 


huttan test moveq #-8,d0 Mask out three button bits 
and.b di ,do 
cmp.b #128,d0 Are the others as expected? 
bne.s clear_syne No, so keep waiting 
moveg #7,d0 Mask in three button bits 
and.w d1,d0 DO.W is just the buttons 
move.b hutton_code(pe,d0},d0 
move.w dQ,button bits(a4) 
bra.s next_byte Button code converted 


® 


button code dc.b 7,5,3,1,6,4,2,0 


* Apply second and fourth bytes, the X deltas 
* 


x byte move .w 


add.w 


Jatest_x(a4),d0 
di,do 


bmi.s clear_xout Don’t move left of zero 
move.w  limit_x(a4),dh 
cmp.w d1,d0 
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and clicking. 

Most mouse-driven opera- 
tions need only one button, 
which saves the user the 
trouble of working out which 
to press; indeed, Apple Mac 
users get no choice in this 
regard. 

The commands were dis- 
cussed last month, so | shall 
not repeat their details here. 
Arcwind can supply the 
back issue if you missed it; 
you may also find the previ- 
ous one (Volume 2 number 
9) interesting as it includes 
three SuperBasic prototypes 
for the mouse drivers. 


Protocol 


Further investigation 
reveals that the three-button 
mouse returns five bytes of 
information at a time. The 
first is easily recognised as 
only three bits ever change - 
these are the button signals. 
The MOUSE_KEYS program 
in issue 9 did not count the 
bytes, but reset itself to the 
start of the sequence when- 
ever it found a plausible but- 
ton byte, and looked for X 
and Y changes thereafter. 

It turns out that the three 
button mouse sends four 
bytes of directional informa- 
tion for every one byte of 
button data. The SuperBasic 
version works fine - at least 
on Hermes - as it treats 
bytes as X and Y moves 
alternately till it runs across a 
new button code. Button 
codes look like extremely 
big negative moves, so they 
are easily distinguished. 


Resynchronis 
-ation 


The machine-code version 
can go faster by reading the 
serial input queue directly, 
but it can still get out of step 
if Sinclair's old IPC loses 
bytes on their way from the 
mouse to Qdos. This is par- 
ticularly likely if the QL is 
busy with a device and can- 
not read serial bytes for a 
while. They pile up in the 
8049 co-processor, and 
soon overflow. 


The DIY mouse handlers 
check the format of the first 
byte and if it is inplausible 
they discard it and wait for a 
valid one, This means that 
the handler re-synchronises 
itself at the start of the next 
complete message. 

Both handlers jump to the 
code labelled CLEAR_SYNC 
when looking for the start of 
a new message. The two 
button version can also veri- 
fy vertical and horizontal 
moves; if it finds a button 
signal when it expects a 
move, the RESYNCH routine 
sets SYNCH% back to one, 
the start of the message, 
and gets on with processing 
the button code. The bit pre- 
fix is the same for both x 
and Y bytes, so there's still a 
risk that the driver will mis- 
interpret a Y byte as an X 
move if you're unlucky and 
only the second byte is lost 

It's not perfect, but it works 
most of the time; if you want 
perfection, get Hermes, or a 
real serial port rather than 
Sinclair's version, which is 
generally fine for output, but 
not so good at input 


Re-assembly 


Listing One was devel- 
oped and tested with 
HiSoft's Devpac 2 assem- 
bler. Symbols like BUTTONS 
were set up at the start of 
the listing, and control con- 
ditional code for the two and 
three button versions, Don't 
try to assemble this listing 
on its own. 

Append the code in 
Listing One to last month’s 
source, and load the result 
into your own assembler if 
you want to modify or exper- 
iment with the full source. 

It ends with the serial 
device name, which 
depends on the chosen 
port, and the table of com- 
mand and function names. 
These come after the code 
to make it easier to change 
them without re-assembly, 
but it is wise to re-assemble 
the entire source if you want 
to change the length of any 
names, and you can't 
change the serial port with 


bls.s 

move .W 
MOVE .W 
bra.s 

clr.w 

bra.s 

endc 


in xrange 


clear xout 


* 


in xrange 
d1,d0 

dO, latest _x(a4} 
next byte 
latest_x(a4) 
next byte 


Set current X to limit 


© 22222222222222222222222222222222222222222222222222222222222 
* 


ifeg 
moveg 
move .b 
addq.b 
move.b 
moveg 
cmp .b 
beq.s 
bpl.s 
move .b 


byte one 
* 


buttons-2 
#0,d2 
dl,d2 
#t,synchro(a4) Count bytes 1 te 3 
synchro{a4},d0 
#-64,d1 

#2,d0 

byte_two 

byte three 
d2,initial{a4) Save byte |, used tater 


Clear high bytes 


Mask for top two bits 
Switch three ways 


* Check & process first byte of message, button code 192+ 


* 


and.b 

cmp .b 

bne.s 
button test moveg 
and.b 
lsriw 
bcc.s 
or.b 
move .w 
bra.s 


only one 


* 

move .d 
move.b 
bra.s 


resynch 


byte two and, 
cmp. 
beq.s 
bec. 
clear sync clr. 
bra.s 
* 
valid x and.b 
moveq 
and. 
lst.w 
or.w 
ext.w 
move .w 
add.w 
bmi.s 
move .w 
cmp . wr 
bis.s 
move .w 
move .w 
bra.s 
clr.w 
bras 


in. xrange 


clear xout 


* 


* Process ¥ deita 
* 


byte three and. 
cmp. 
beq.s 
bec. 
bra. 


and.b 
moveq 
and.b 
lst.w 
cr.w 
ext.w 
move .w 
add.w 
bmi.s 
move .w 
cmp.w 
bis.s 
move .w 
move .w 
bra.s 


in yrange 


* 


clear_yout clr.w 
bra.s 
endc 


* 


stream dc .w 


d1,d2 

d1,d2 

c lear_sync 

#48 ,d0 
initial(a4),d0 
#5,d0 

only one 

#2,d0 Flag button 2 in bit 1 
d0,button bits(a4) 

next byte 


Check top bits only 

Are others as expected? 
No, so keep waiting 

Mask only valid button bit 


Shift to bit “0 and carry 


#],synchro(a4) Reset count to one 
d2,initial(a4) Treat new byte as first 
button. test 


d2,dl 

#1 28,1 
valida x 
resyncn 
synchro(a4) 
next byte 


Check top bits 


Await start of sequence 


#63,d2 
#3,dl 
initial(a4),a] Dl is two MS bits 


N2 is six IS bits 


D1l.W is signed X delta 
latest_x(a4),d0 
d1,d0 
clear xout 
Vimit_x(a4),dl 
dl ,d0 
in_xrange 
di,d0 
dO, batest _x(a4) 
next_byte 
do Zero 
in. xrange 


Don't move left of zero 


Set current X to limit 


d2.dt 
#128,d1 
valid y 
resynch 

c lear_sync 


Check top bits 


#63,d2 

#12,d1 
initial(a4),dl 
#4,d1 

d2,dl 

di Bl.W is signed ¥ delta 
latest_y(a4),d0 
dt ,do 

clear yout 
limit_y(a4),dl 
dl ,d0 

in. yrange 

dl ,d0 

dO, latest y(ad4) 
clear syne 


B2 is six LS bits 


Dl is two MS bits 


Stop at zero 


Stop at limit 


latest_y({a4) 
clear _sync 


2 


6 


0 
4 


W 
-W 
>. 
W 
<b 
W 
-b 
W 
= .b 
>. W 
-b 
-W 
-b 
-W 
W 
W 
-b 
-W 
-b 
W 
-b 
-W 
-b 
W 


out re-assembly. 

The only unusual features 
are the conditional assem- 
bly, discussed last month, 
and word sizes after vector 
addresses like $112.W 
(BV.CHRIX) and $E2.W 
((O.QOUT). Remove the sec- 
ond .W on the line if your 
assembler objects to it. At 
worst, it will cost you an 
extra two bytes of code if the 
long address of the vector is 
used; it will still work fine. 


Loading 


Listing Two generates 
code for the three-button 
Mouse Systems PC serial 
mouse handler for SER2. It 
reads the code from Basic 
DATA statements at the end 
of the listing, stores the code 
in memory, then writes it to a 
file after checking. These 
three commands load and 
link the resultant 
MOUSE3_CODE file: 


xpoint-* 
6,°PTR X%’ 
ypoint-* 
6,’PTR_Y%’ 
button-* 

7, BUTTON%‘ 
synch-* 

6,’ SYNCH% 
0 


"SER’, “O’+ser_port, ‘IR’ 


Six procedures 


point off * 

7,‘PTR OFF’ 

point on-* 

6,’PTR ON‘ 

point_box-* 

10,’PTR_ LIMITS’ 0, 0 , X% , ¥% 
point at-* 
7,'PTR_POS’ 
point_max-* 
7,°PTR MAX’ X% , ¥% 
point inc-* 
7,’°PTR_INC’ X% , Y% 


X% , Vi 


Four functions 


X=RESPR(588) 

L. 8 ..% fe 
FLP1_MOUSE3_CODE,X 
CALL X 


This sequence of com- 
mands adds the extensions 


PTR_ON, PTR_OFF, 
PTR_POS, PTR_MAX, 
PTR_INC, PTR _LIMITS, 
SYNCH%, BUTTON%, 


X_PTR% and Y_PTR% to 
SuperBasic. Plug the mouse 
into SER2, then use these 
commands to initiate mouse 
communications: 


BAUD 1200 
PTR_ON. 


If you want to stop the 
mouse handler, perhaps to 
use the serial port for some 
other purpose, enter: 


PTR_OFF 
If you change the baud 


rate remember to restore 
BAUD 1200 before you re- 
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start the mouse handler, 

Notice that the three-button code file is shorter than the 
Microsoft serial mouse version. There are more buttons, and 
Mouse Systems messages are longer, but there is no need 
to shuffle bits between data bytes to get the co-ordinate 
updates. 

If you don't like the names of the commands and func- 
tions you can patch or ALIAS them, as | have explained in 
past columns. If you need to remove them from the name 
table, with a routine like FORGET from DIY Toolkit Volume B, 
make sure you turn them off first with PTR_OFF, or the inter- 
rupt will be left running and you will no longer be able to 
stop it 

The processor time used by the driver is almost unmea- 
surable when the mouse is still, but it can slow the machine 
down by a few per cent while the mouse is moving fast and 
sending many bytes per second. 

A-set of DIY Toolkit mouse drivers is included in the latest 
volume on disk, available by post from former Quanta editor 
Dr. Bill Fuggle. Volume | includes the SuperBasic prototypes, 
wiring details, example programs, assembler source and 
binary code for “Mouse Systems PC" and ‘Microsoft’ serial 
mouse drivers to suit either serial port. These come in two 
versions, one of which sends key signals so it can be used 
with programs like Quill, Abacus, Turbo and editors which 
normally only work with cursor keys. 

DIY Toolkit volumes cost three pounds each on disk or 
microdrive cartridge, and come with printed documentation if 
you order two or more. Twenty four volumes are available 
from DIY Toolkit, 86 Lordswood Road, Harborne, Birmingham 
B17 9BY. Please make cheques payable to DIY Toolkit, and 
send a stamped selfaddressed envelope if you would like 
further details. 


Next Issue 
Next issue features the final part of this project, with add- 


on code to let the mouse handler generate key-presses, a 
few extra features, and a checklist for reliable pointing. 


Table: Internal Mouse Variables 


Name Word Number Description 

Latest_X 0 Current X co-ordinate 
Latest_y 1 Current Y co-ordinate 
Limit_X 2 Right margin limit 

Limit_Y 3 Top margin limit 

Step_X 4 Counts per horizontal move 
Step_Y 5 Counts per vertical move 
Button_bits 6 Bits shadow each button 
Synchro 7 Input byte number 1 to 3/5 
Initial 7 Microsoft initial byte 
Serial_ID 8+9 Zero or serial tag & channel 
Drift_X 10 Accumulated X drift 

Drift.Y 14 Accumulated Y drift for keys 
Key_flag 12 Set to request key queueing 
Wrap_flag 13 Set to allow wrap at edges 
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0 DA'TA 


20 DATA 


REMark Sinclair QL World HEX LOADER v 3 


G REMark by Marcus Jeffery & Simon N Goodwin 


CLS: RESTORE :; READ space: start=RESPR( spa 
PRINT “Loading Hex..." : HEX_LOAD start 
INPUT “Save to file..." 

SBYTES f£$,start,byte : STOP 


DEFine FuNction DECIMAL(x) 
RETurn CODE(hH$(x))-48-7*(h$S{x)>"9") 
END DEFine DECIMAL 


DEFine PROCedure HEX_LOAD(start) 
byte = G : checksum = 0 
REPeat load_hex_digits 
READ hs 
LF h$="*" ; EXIT load_hex_digits 
IF LEN(hS) MOD 2 
PRINT"Odd@ number of hex digits in: " 
STOP 
END IF 
FOR b = 1 TO LEN{h$) STEP 2 
hb = DECIMAL(b) : lb = DECTMAL(b+1)} 
LF hb<O OR hb>15 OR 1lb<0 OR Lprls 
PRINT"[Tllegal hex digit in: 
END iF 
POKE start+byte,16*hb+lb 
checksum = checksum + 16*hb + lb 
byte = byte + } 
END FOR b 
END REPeat ioad_hex_digits 
READ check 
IF check <> checksum 
PRINT "Checksum incorrect. 
END IF 
PRINT "Checksum correct, data entered at: 
END DEFine HEX_LOAD 


Recheck data. 


0 REMark Space requirements for the machine 


NATA 588 

"43FA01DA34780110","4ED2616267507220" 
"7400701846414A80","665645FA012C214A" 
"906421470008217C","O1LFFOOFFOO10217C" 
"90006006A00142C08","70004E4144A8009C" 
"661641FA01907200" ,"760170014E424A80" 
"661022462348001C" ,"2046701C4E417000" 
"4E7520462E007019" ,"4E4120074E75617A4" 
"457561 FA6B70202C" ,"0010670620407002" 
"Ah4241ECFFF4701D","4E41701960CE3478" 
"01124E92667C5343" "66763631 E8006144" 
"382C000C67364A43","6732B67C00036260" 
"5 343070466267800" ,"6022612E7800182C" 
"OOOESONC7ADNGO0O2","7A02611E38345800" 
"7202347801 1LA4E92","55AF0058226E0058" 
"3384E80078037000","4E7570004E412E3C" 
"4449593149F8003C","2014670E2840BEAC" 
"OOOS66F449ECO00C" ,"4E75588F70F94E75" 
"JOFL4E7561D4508C", "601647EB001] OBBCB" 
"6 2EE61C6588C6002","6100347801124E92" 
"66E0554366DA3231", "E8006BD44841 3231" 
"ESO26BCC28814E75","202E009C67F82440" 
"327800E249EB0014","4E9166EA4861522C" 
"OQO0OE102CO00E5300","672C080000006646" 
"3420000294416B10","322C0006B4416302" 
"3401394200026004","426C0002590066CB" 
"422COO0E60C270F8","COO1BO3COO8066F0" 
"7007C041103B0008" ,"3940000C60AA0705" 
"030106040200302C","0000D0416B10322c" 
"0004B04163023001","39400000608A426C" 
"0000608400065345","523249520006FE94" 
"075054525F4F4646","FE22065054525F4F" 
"4EOOFF280A505452","5F4C494D49545300" 
"PF28075054525F50","4F53FF1807505452" 
"SF4D4158FF000750" ,"54525F494E4 30000" 
"OO04FEA206505452","5F582500FE9C0650" 
"64525F592500FE58" ,"07425554544F4E25" 
"PE7A0653594F4348","25000000","*",443 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


Three button SERIAL MOUSE SuperBASIC DRIVER LOADER 


ce) 


hs 


"GhS : 


code 


48 


Neural — 
Networking 


Dr Steven Wilcox’s QL works on a new field of artificial intelligence. 


nis article aims to intro- 

duce a new type of 

computing that can 

only be simulated cn a 
digital computer I'ke the QL This 
is 1eural Computing, a relatively 
new area of researcn (in its Ccur- 
rent form) in the arena of artifi- 
c:al intelligence (Al), Artificial 
neural networks (ANN) resu'ted 
from an investigation into the 
usefulness of a set of simple 
processing units connected 
together in different ways, The 
resull has been the this new 
form of computing, which has 
recently found its way out of the 
Al taboratory and into applica- 
tions as diverse as stock market 
forecasting ta soeech recogni- 
tion, Ferstly, |would like to recap 
some of the short history of Al 
or, more correctly, machine 
learn-ng. 

Machine learning {ML} has 
played a central role in Al from 
the start of research into the 
field, although main thrust of Al 
research has deviated from this 
area with the arriva' of such sig 
nificant develooments as proo- 
lem solving, theore™ prov:ng, 
ropotics and expert systems 
(ES). But recently ML has again 
started to piay a significant and 
increasing part in the develop 
nent of Al. For instance, early 
wors On perceptrons (which are 
simple neuron-like processing 
units) Suffered same setbacks 
because of an inability to salve 
non-linear functions, presented 
oy M.nsky and Pacert [1]. 
However, there nas been a 
resurgence in scientific and 
media interest due in part to the 
work of Hopfield [2], Ballard, 
Hinton and Sejnowski [3] who 
have played a large part in the 
development of ANNs with nid- 
den layers (layers of neurons 


that are nat directly connected 
to the input or Output of the net- 
work) Capab'e of learning to 
recognise non-‘inear functions. 


How to learn? 


The ability to learn, to adapt 
and to modify behaviour has 
been regarded by some as a4 
exclusive property of organic 
beings, while some oeople 
arque that only human beings 
possess learning capabilities 
and intelligence. It is provable 
thal the ‘aodility to learn’ is a ore- 
requisite lor any form of intelii- 
gence and, in order to chec for 
intelligence, a test has been pro- 
posed by Turing [4]. In this test a 
human being is as<ed to com- 
municate, through a terminal, 
with two or more other opera- 
tors one of which is the artificial 
syslem. If 
tne human 
being can 
not tell 
whether the 
answers to as 
his ques- 
tions were 
from the = 
system or 
the other 
human tnen 
tne artificiai 
system 
could be 
regarded as 

ssessing 
true intelii- 
gence. 

Early 
attempts at 
appiying this 
test have 
proved how 
difficust it wili 
oe for a 
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Figure one: The neural 


machine lo achieve intelligence 
defined in this way. A computer 
program known as ELISA [56,7] 
achieved partial success until 
Ihe person communicating with 
it worked out how it was com- 
posing its answers. In reality, the 
program does not ‘understand! 
the words in the sentence but 
simply examined the sentence 
for key words lo operate on, or 
used one of a set of standard 
replies. 


Neural networks 


One aporoach to Al, as briefly 
mentioned earlier, is the ariificial 
neural network {ANN). It is not 
clear whether the ANN 
approach is ‘ixely to achieve 
success as defined by Turing, 
but it has merits of ils own 
were specific solutions are 
requrred to specific praoclems. In 


wew of the use of ANNs 
in tnis article, some of the 
features of botn real 
neural networks and 
ANNs are outlined below. 
Two of the main com- 
ponents of Ihe brain are 
the cerebellum, and the 
cerebrum and cerebral 
cortex, wnich Surrounds 
it The cerebral cortex 
has a Surface area of 
2000 sq cm, is approxi- 
mately 3 mm thick, and is 
composed almost entire- 
ly of a layer of neurons 
six-deep. It contains 


about 100 billion neurons, with 
the central nervous system as a 
whole containing perhaps as 
many as 1000 billion. It is 
thought that the cerebrum and 
ceredral cortex perform most of 
the higher-order functions of our 
existence such as creativity and 
reasoning, with the cerebellum 
performing lower level functions 
such as the control of breathing, 
A biologica! network is con- 
stantly changing as the organ- 
ism learns new skills, and it is 
thought that this is partly 
achieved by changing the 
strength of the connections 
between neurons. As well as the 
strength of connections increas- 
ing and decreasing (the strength 
of tne connection between two 
neurons is Known as its 
"weight", connections appear 
and disappear throughout the 
ifé of the organism. In fact, neu 


for Letter 1 


for Number 1 


rons can die if they do nol make 
uselu! connections and in the 
first few years of (fe around 15% 
of neurons die because they do 
not make useful connections 
with olher neurons through 
nerve fibres called axons. 


Connection 
changes 


IN a similar manner, the con- 
nections in an ANN constanlly 
cnange as the netwerk learns, 
and lhese tco can appear and 
disappear as the strength of 
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connection between “neurons” 
increases Or approaches zero. 

The reuron makes connec- 
tions with other neurons and 
commurncates through the axon 
(lhe main communication fibre) 
and dendrite {the connection to 
the neuron). Communication is 
achieved by emitting electrical 
pulses (termed "firing’), around 2 
milliseconds in duration and 
100 millivolts in amptitude. 
When the sum of the input 
weights (the pulses from other 
neurons) the neuron receives 
exceeds a certain excitation 
levei it will fire itself. 

An artificial network doesn't 
emit pulses to communicate 
wilh otner neurans, Instead, it 
emits a number between 0 and 
1 that is a function of the inputs 
it receives from other neurons. If 
the sum of the inputs, when it 
nas been weighted in a particu- 
lar manner, exceeds a preset 
fave! then the neuron will emit 
ihe appropriate number. The 
precise procedure is described 
later in this article, 


ANNs 


Artficial neural networks 
(ANNs) are a simplistic repre- 
sentation of this type of biclog!- 
cal network. Usually they consist 
cf a sel of inputs with a series of 
ndden layers followed by a set 
of culputs. There are two broad 
classes of artificial neural net- 
work. The first class uses distrib- 
uled representation, where tne 
total knowedge (for every orcb- 
lem to be solved) of the network 
is distributed across the entire 
network, Figuré one shows an 
example of such a network In 
this example every neuron in 
Ine input layer is connected to 
every neuron in the middle (or 
hidden) !ayer, which is in turn 
connected to every neuron in 
the output layer. 

The second methed uses a 
localised representation, where 
single processing units, or small 
groups of units, hold the knowl- 
edge required to solve a single 
problem. This type of network 
wiil not be demonstrated here. 

A network learns to discrimi- 
nate between classes of pal- 
terns from an input domain in a 
holistic manner. The network is 


presented wilh sets of features 
(usually one-dimensional arrays 
of data collected from the prob 
lem) thal are representative of 
the instances of each class, car- 
rectly labelled, and the ANN is 
trained to recognise these. It 
does this by readjusting internal 
weights in a fixed network lopol 
ogy via a learning algorithm, so 
that the weights are oplimised lo 
the entire training set These 
algorithms, in essence, calculale 
the amount of credit each active 
processing unit deserves by 
comparing the output of the sys 
tem with the correct response. 
Current ANNs do not accu- 
rately represent the biclagical 
equivalent, but rather 
exploit ways in which 
itis possible ta con 
nect a set of simale 
processing units. The appl'ca- 
tion of the approach to reai 
problems, such as word recog- 
nition, has shown that the ANN 
has the ability ta recognise fea- 
tures more accurately fram the 
input demain than has previous- 
ly been possibie using the 
Expert System-type approach 
[2]. 


ay ANN for the 


The network that I'm 
gaing to present and 
use is of the simple 
feed forward type, 
trained by a backpropagation 
algorithm that ensures that all of 
the network is invo-ved in the 
storage of knowledge. Figure 
one shows a d:agram of the lay- 
out of the network and the con- 
nections of each neuron. 

The reason for this choice af 
network is relatively simple. The 
“feed-forward” type of network 
has been shown to perform well 
in other situations and is relative- 
ly well developed. The training 
algorithm, “back-propagation" 
has been deve'oped for this 
type of network and has similar- 
ly been proven. 

The network functions by the 
combined effects of individual 
neurons which compute a 
weighted sum of their inputs to 
give an excitation (Sepsilon$). 
This is then used in a “sigmoid” 
function (the excitation function} 
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cf tne form: 


This tyoe of function makes 
the neuron more "decisive" as 
the state of the neuron will 
switch from inactivity to activity 
very quickly around the central 
paint of the functionFor each 
neuron the training rule is to: 


a) Present the network with 
the input The neuron oulput is 
given by calculating: 


o(i) = Bw(j).2(9) 


Where: 


af) 's the output of the ith neu- 
ron 

w(i) is the weight of the jth 
input to the ith neuron 

i(j) is the input to the ith neuron 
on the jth input line 


o) For each neuron compute 
the error, which is given by: 


A(i) = [o(t) — do(2)].f'(€) 


Where: 


{AX} is the error of the itn neu- 
ron 

ofi) is the actua! output of the 
ith neuron 

da{i) is the desired output of 
the ith neuron 

f(e) is the derivative of the exci- 
tation funclion 


c) Adjust the weight w(i) by an 
amount given by k(A){i}i()), where 
k is a constant that determines 
the rate of learning. 

This training algorithm works 
for single layered networks bul 
a bit more work is required for a 
multi-layer network as, this 
method does nol allow the hid- 
den layers to be trained. If these 
layers are ignored in tne training 
algorithm then they will net 
assist in the decision making 


process and are therefore 
redundant 


Hidden layers 


Hidden layers can be utilised 
by Computing the error for each 
neuron in the output layer, (Axi), 
and associating with each hid- 
den unit in the layer beiow a 
proportion of lhe error of each 
output neuran to which it is con- 
nected. This proportion should 
obviously be the strength of the 
connection between the hidden 
neuron and tne output neuron. 
This means that the hidden neu- 
ron's error will be a weighted 

sum of all the errors of all 

the output neurons to 

which it is connected, 

weighted again by the 

derivative of the excitation 
function, This approach is then 
propagated back through the 
network, a layer al a time, until 
the input layer is reached. 
Hence the term “back: propaga- 
tion”. 

If each inpul, as in Figure one, 
is used for character input and 
a number of different neurons 
are used to represent different 
recognised characters it is pos- 
sible to train the network to 
recognise typed letters by the 

state of its inputs {the let- 

ter) by repeatedly pre- 

senting random selec- 

tions from the character 

set and telling the net 
work which fetter this is. If the 
training set is representative 
then the nelwork can be pre- 
sented with new dala from the 
keyooard and asked to make a 
prediction as to which key the 
data comes from. The output of 
each neuron will hen be repre- 
sentative of the probability of the 
letter being in that region, 
Obviously, the higher the proba- 
bility the more certain of its 
choice of letter will the network 
be. If the network cannot decide 
on the letter then this will mani- 
fest ilself as similar lower proba- 
bilities over several or all Output 
neurons, 


SuperBasic ANN 
code 


The ANN code and theory that 
| have presented is based on 


the Hopfield (a researcher who 
has been very active in this 
area) network with a back-prop- 
agation training algoritnm. The 
network is supervised during 
training, so is only of use where 
ine supervisor knows what the 
output of the netwark should be 
for the training set of data When 
the network has been trained, it 
then should be possible to pre- 
sent the network with new 
examples of the oroblem and 
with a iittle luck, and if the exam- 
ples have been properly select 
ed, the network should classify 
them correctly, 

As an aside, a recent television 
programme contained a good 
example of a network that had 
not been trained on representa 
tive data The examp'e came 
from the US military where they 
had been training a network to 
recognise tanks in various types 
of undergrowth. They had tanks 
in open fields, partly hidden by 
pushes, groups of tanks, etc. 
The training went well, but when 
they came to test the network 
on examples that had not been 
oresented previously, the net- 
work performed very poorly, 
After a small investigation it was 
found that the training data con- 
sisted of slides of tanks on 
sunny days and slides of no 
tanks on cloudy days - the net- 
work had learnt ta recognise the 
difference between a nice and a 
grotty day, a possibility that had 
none of the intelligent life forms 
present had taken into consider- 
ation! This emphasises the need 
to make the training data repre- 
sentatve of what you want tne 
network to learn. 

In order to train the network, 
large numbers of presentations 
of each input have lo be made. 
In this example around five hun- 
dred is the minimum thal can be 
used. All this takes some time, 
and if you have a compiler then 
everything will be speeded up 
enormously, The code has been 
compiled witn QLiberator 3.35, 
80 should compile with little 
problem with other compilers, 
allhough | have not been able to 
test this. lt should also be passi 
ole to run the network on a 
basic 128K QL as there are no 
large arrays and the code is not 
very big. 


Setting weights 


The code consists of five pro- 
cedures, run_network, 
‘get_inpul, ‘setup_network, 
“show_results’ and ‘train_net- 
work’ with ‘run_network’ and 
‘train_network' being the main 
routines. Procedure ‘setup_net- 
work’ simply sets the weights of 
avery connection to a random 
value between -0.5 and 0.5 so 
that the weights are set to vai- 
ues that are not lhe same every 
time the network runs. 
Procedure “get_inpul’ randomly 
selects either the letter ‘|’ or the 
number °1' from the character 
set, then determines the equiva- 
lent binary value (input vector) 
and the correct output for each 
Output neuron, (The training 
flags in the array target() is 
changed from 1 or 0 to 09 and 
0.1 as it is very difficult for the 
weighting function used to 
approach 1 and O) 

Procedure ‘run..network’ takes 
the input vector and with the 
current weignts calculates the 
outout of the network, which is 
then used in the procedure 
‘train_network' to propagate the 
error derivative backwards 
through the network from output 
to input whilst adjusting the 
weights to minimise the error. 
Finally, procedure “show_results’ 
crudely displays the resulls 
either while training is taking 
place or when the network is 
being tested after training is 
completed. 

When you first train the net 
work it can appear to be a lost 
Cause, as the error takes quite a 
time to reduce, at the start it may 
even increase for awhile. 
However, if you persevere and 
come back in the morning, the 
training will be completed and 
you will be able to test it with 
new input fram the keyboard, 
This is where lines 1220 to 
1600 come in as they take the 
cade for the letter ‘!’ or the num- 
ber “1',or a random pattern if 
you press any other key, and 
present it to the network Strictly 
speaking this is not a proper 
test of the network as the test 
data and the training data are 
identical and, it would be very 
disappointing if the network 
failed. This is however just an 


iGCES 

1020 output neurons=2 

1030 input_neuruns* 8 

1040 layers=2 

1650 rterations— 500 

1060 DIM neuron_output(input_neurons,jayers) 
1670 DIM ncuron weight(inpul_ veurons, 

Wspul_ neurons? | layers) 

1080 DIM deltafanput, neurons,layers) 

1090 790M inputs(inpul_ neurons), 

uetork outpul(inmpul neurons),taryel(inpul euros ) 
1100 setup network weights layers,:nput neurons 
1110 count-0 

1120 average error=0) 

1136 REPeat train network loop 

1140 get input maput_neurons,cutput_peurons 
1150 run network output _neurons,inpul_ neurons, 
lavers 

1160 ta network oulpul neurons, uiput neurons, 
layers,.7 neuron error 

1170 count=count+! 

1180 show _results oulpul_neurons,unput_neurons, 
neuron effor,count,average error, ] 

1190 IF count>~ilerations THEN EXIT traim_net 
work Joop 

1200 END) REPeat train network loup 

1210: 

3220 RiPeat pet uew data 

1230 CLS 

1240 PRINT "Press L,) or any ober key" 

1245 CLS 

i250 PRINT 

1260 keySmINK PY RH40,- 1) 

1270 kev CODE (key$) 

1250 SELect ON kev 

1290-49. RESTORE 1590 

1300 FOR v=) TOounput neurons 

1310 REAL inputs(i) 

1320 END FOR 

1330 run network oulput neurons,input neu 
rons, layers 

1340 show resulis output_ neurons wiput ne 
urons,neuron efror,countaverape error,O 

1350 = 108 : RESTORE 1600 

1360 FOR 11 TO input _neurous 

1370 READ inputsi) 

{380 END FOR 1 

1300 nan network outpud neurons wapul bet 
sons lay ers 

1400 show i¢sults Gulpul ncurons,inpul eu 
TOYS NCUTON CHOY, COUNLAVCTALe error, {} 

1410) -REMAINDER - 

142000 a=RND:b=RNI:c=RNI:d=RND:e=RND FERN: 
2°RND:b- RND 

1430 IF a>.5 THEN inputs 13-1: ELSF. 
tnaputs( Lye END IF 

1440 oT b>. S THEN inpuis(2)-}: ELSE 
niputs(2) -O; END IF 

1450 IF c>.5 THEN inputs(3)=!: FLSE 
Inpuis(3}=-0 END IF 

1460 IF d>.S THEN inputs(4)=1: ELSE 
mputs(4}-O; END LF 

470 IF e> 5 THEN inputs(S)—1; ELSE 
inputs, 3}-0: END IF 

1480 If f>.5 TEDEN miputst6} 1: ELSE 
mputs(6)0; END IF 

1490) IF y>.5 THEN inputs(7)=1. ELSE 
inputs, 7-0: END IF 

1500 IF b>. 5 THEN inputs¢s}<1: ELSE 
uiputs(S) Oc END IF 

YS510  run_network output neurons mipul neu 
rors, layers 

1520 show results output neurons.upul neu 


hors, 


x 
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HEUTON error,counLaverage error,d 

1530 END SE Leet 

1540 PRINT 

1550 PRINT “Press any key to continue” 
1560 a$-INKEYS(#0,-1) 

S70 CLS 

SsU NID RE Peat pet new data 

500 DATA 0,0,1,1,0,0,0,1 

600 DATA 0,1,1,0,1.1,0,6 

610 


iuput neurons, layers) 

1630 POR pet ‘FO unput neurons 

40 0 penron weighi(.imput neurons+1 1) 
1650) POR y- 1 YO input neurons 

1660) e-e neuron _weighi(ty, )*inputsG) 
1670 NEXT | 

4680 uenton ontpalts, =U +h XP(-e)) 
£00 NEXT 4 

{OU > 

“LO TP layers> 1} TLILN 

17200 FOR k- 2 TO layers 

1730) FOR i=+1 TO input neurons 

i740 e=nencon_weightt,inpnt_neurons+ 1k) 
1750) POR j=1 TO input neurons 

"60 cel neuron weight(ij.ky* neuron ont 
putyk-1) 

177) NEXT) 

[7800 peuroit outputyk)> 14 1+EXPi-e)) 
1790) NEXTI 

TOO NEXT 

WIG END TF 

L820. ; 

i830 POR y FPO output veurons 

TS400 netork outputtiy neuron output(i layers) 
ISSQ NEX Pa 

[S60 LENE ae nun network 

ISTO - 

1e80) 

Jov0 Dk bine PROC cdure pet maputiipul ocurous, 
culpul neurons) 

1400 a RIND 

110) UF a> -5 THEN 

i920) RESTORE 2140 

i930 FOR) TO input neurons 

HO READ inputs() 

19SQ) ENT FOR a 

1960 iargeu))= 1 

19"O targel 2 0 

1O80) LIND EP 

1990) TP as 5 THEN 

"000 RESTORE 2180 

-U1O) POR 1 TO input neurons 

C20 READ aiputsir) 

“030 END FOR 4 

*O40 targen Ly-0 

2OSO larpeti2}- 1 

2060) END UF 

2070 FOR a 7 TO output nearons 

20800 TF targettar 1 TEEN 

ANVO  targeny .Y 

2100) ELSE 

2100 target(1): 01 

21200 ENDIF 

S130 PND POR a 

MW DATAG TG 100 REMark | 
ASG DATAG,O,1,1,0,0,0,1 > REMark } 
“160 END DEPine pet mput 

ATT s 

TBO : 

2790 DEPine PROCedure setup_network_werhts{ 
wiput tenons) 

2200 FOR k71 TO tayers 

2210 PORE L TO input neurons 
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1620 DEF ine PROCedure run uetwork(outpul neurons, 


example and, for more general 
input the procedure “get_input' 
could be altered to take training 
data from a fie that contained 
scanned images for example. 


Conclusions 


After, ali this you might be 
thinking ‘so what’, there are 
excellent routines for getting 
Keyboard input and turning it 


into a character on the screen, 
but this misses the paint This 
code has learnt to recognise the 
two characters by being pre- 
sented with exampies, and so in 
principle it snould be possible to 
extend the network so that it 
recognises more characters, 
and even characters from other 
sources, such aS a scanner, or a 
paint package. Perhaps you 
could try scanned images of the 


2220) FOR j= 1 TO mput neurons +} 
2230 neuron weighttig,k): (RND-.5) 


2240 NEXT] 
2250) NEXT) 
2264 NEXT k 


2270 PND DEFine setup network weights 


2280 : 
2290 - 


2300 DEF we PROCedue show resullstouiput neurois, 
tipul neurous neuron error,cound average crror, 


print tarety 
PUIG AT a 


2320 PRINT "A. Sumpte Neural Network 
2330 FOR A=! TO mput_ neurons 


2340) PRINT "Input “simpuis(r) 


2350 END FOR ¢ 
2360 PRINT 


5370 IP print, larget=1 THEN 


2386 FOR a1 TO output neurons 
2390) PRINT "Target "Wn" “jtargetii),"Result 


eg. at 


vi “Saetork outputin) 
2400 END FORA 
7410 PRINT 
2420 EN} IF 


2430 TF print target=0 THEN 


2440 FOR &-1 TO output neurons 
7450 PRINT "Result "3;" "snetork outputts 


MOO RMI POR y 
2470 PRINT 
24380 END I 


2490 PRINT “Nusber of lererations "jcount 
2500 PRINT "Erroc this time "neuron error 
2510 average emor=.2*neuron error! $* 


aVerape ciTor 


2520 PRINT "Sinoothed error "javerage error: 


A SS0 FING PY Pine abe results 


NOU GEV inae PROC Ue ttl iebworkloulpeal eu 


POMS, 


veEpult Weuror 14 Jayers eta, neurs y L error) 


2876 ueuron errar=0 


2580 FOR G1 TO input neurons 

2590 IF i<=output neurons THEN 

2600 delta(ilayers)=(larget(i)-netork outpui 
N i))*netork output(i)*(1-netork ouiput(i)) 

2610 nearon_errorm-neuron_ errors (tareect(i)- 

hetork outputa))* target(d-netork oulput() 


2620) ELSE 

2630 delta layers}-0 
2640 END IF 

2650 NEXT 1 


2660 FOR k= lavers-} TO 1 STEP -1 
2070) FOR v-} TO input, neurons 


T0800 dehasuni-0 


2690) FOR y=) TO input neurons 
2700  deltasum--deltasum | cdeltayk | 1)* 


neuron weight()k+1) 


letter“! and number °1' from 
source code printouts, as these 
are often difficult for humans ta 
distinguish. 

Whatever you do, please 
experiment with the network 
and feel free to modify and use 
it wherever you can, The area of 
Al, and in part:cular that of neur- 
al networks, is realy only just 
developing, so this is an area 
where individuals Can make 
progress in the fie'd, There are 
even some text books aopear- 
ing, which any decent library wel 
be able to order {see Looking 
for a Book?, Hardy Hints, QL 
World March 1993) and so it is 
relalive'y easy to ‘bootstrap’ 
yourself ta the current state of 
understanding, and then you 
may be able to push forward 
ihe frontier of human know! 
edge. 


References 


M.Minsky and S.Papert, 
Parceatrons: an Introduction toa 
Comoutational Geametry MIT 
Press, Massachusetts, 1969. 


D.W.Tank and J.J.Hopfield, 
Neural Computation by 
Concentrating Information in 
Time Proceedings of the 
National Academy of Science, 
84, April, 1987, pages 1896- 
1900, 

D.Ballard and G.EHinton 
and T.J.Sejnowski, Paralie! 
Visual Computation Nature, 306, 
21, page 26, 1983. 

AM.Turing, Computing 
Machinery and Intelligence 


M:nd, 59, pages 433 460, 1950. 


J.Weizenbaum, ELIZA - A 
Compuler Pragram for the 
Study of Nalural Language 
Communication between Man 
and Machine Cor munications 
of the Association for 
Computing Machinery, 9, pages 
36 - 45, 1966. 

J.Weizenbaum, Automating 
Psychotherapy, ACM Farum, 17, 
page 543, Reorinted with 
Replies, CACM, Volume 26, 
page 28, 1983, 

J.Weizenbaum, Comauter 
Power and Human Reason: 
From Judgment to Calculation, 
W.H.Freeman, San Francisco, 
1976, 


2710 NEXT) 

2720 deltav.k) nevron_output(k)*t1- 

“neuron _outputd,k) A deltasum 

2730 NEXT) 

2740 NEXT k 

2750 FOR 1=1 TO input neurons 

2760 FOR y=1 TO input neurons 

2770 neuron weryhl(ij,))- neuro, werghtliy tr! 
clat delat, D* imputs()) 

3780 NEXT j 

2790 neuron weigitu,input. neurons + 1, 1)> 
ueuron weizht{iinput neurons +1,1)1eta*deltai, 1) 
2500 NEXT 


PN1O- 

2820 

2830 FOR ke 2 TO layers 

2840 FOR i -1 TOonpul neuroies 


7850) POR y=) TO input neurons 
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2870 NEXT) 
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User Guide, Reference Manual 
Full QDOS compatibility 
Configurable Memory up to 16Mb 


Turbo Performance - Naive Reverse exceeds 5k LIPS (GC) 


For more information contact us at 
Rosebank, Stream Road, 
Upton, Oxon, OX11 9JG 
Tel/Fax: 0235-851818 


Price including postage/packing £89.95 


Grange 
Technology 
Limited 


PFOLPULD 
UO@@LLDON. 


Bryan Davies 
sizes up Digital 
Precision’s 
ProPub assis- 
tants. 


INFORMATION 
Program: Professional 
Publisher Toolbox | & II 
Price: £29,95 each, 
£49.95 

for both 

Supplier: Digital Precision 
Ltd,, 222 The Avenue, 
Chingford, London 

E4 9SE. 

Tel. 081 527 5493. 


ProPub toolbox | 
was reviewed in early 1991, 
and is essentially the same 
now as then (including the 
price). It is worth looking at 
it again because the inter- 
est in DTP Is, if anything, 
higher now than it was, 
and because there is a 
Toolbox {I to go with it. 

Reviewers have an 
unending stream of new 
programs (and new ver- 
sions of existing programs) 


placed before them. It’s 
easy to forget that many 
users stick with the same 
program - maybe even the 
same version - for years. 
These users welcome add- 
on programs, which extend 
the range their existing pro- 
grams without creating 
headaches. Learning new 
main programs usually 
means days or months of 
study, whereas add-on 
items can quickly be mas- 
tered. 

Both Toolboxes come on 
floppy disk only, and 
require a minimum 256 KB 
memory expansion. As 
ProPub itself requires a 
minimum 512 KB extra, the 
buyer of a Toolbox is 
almost certain to have a 
suitable system. 


Toolbox I 


There are two programs, 
a set of 44 founts, a collec- 
tion of 13 clip art images, 
and a few odd demonstra- 
tion graphics files on the 
disk. There is also a boot 
file and a SuperBasic 
extensions file. These two 
files will normally be incor- 
porated into the user's 
ProPub boot file, as the 
boot is a one-liner which 
loads the extensions, and 
these are included in the 
Toolkit extensions file with 
ProPub (and in the Xtras 
file with The Editor). There 
is an UPDATES_DOC file, 
which is short and points 
out that some items noted 
in the instructions are no 
longer on the Toolbox | 
disk, but incorporated into 
Toolbox Il; in their place, 
there are extra clip art files. 

The founts all have the 
suffix _HDF, indicating that 
they are the better, high- 
definition type. The clip art 
files number thirteen and 
have the suffix CUT, which 
will probably be familiar to 
regular DTP users. The 
other graphics files are an 
assortment of Digital 
Precisions’ own files, and 
have been seen elsewhere 
(such as with ProPub itself). 

The clip art files are not 
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sensational, but could be 
useful if you require illustra- 
tions of that type; various 
animal and country 
images, for instance. The 
founts are the better part of 
the disk, covering quite a 
wide range of styles. 

The programs are utilities 
- Grab_Sector_ClipArt and 
PrepText. Sector Software 
had a collection of clip art 
files, and Grab is designed 
to capture these images 
and put them into a form 
suitable for loading into 
ProPub: standard 32 KB 
screen dump _ format. 
PrepText is aimed at text 
created in a word-process- 
ing program, the obvious 
one here being Perfection. 
It puts text into a more suit- 
able shape for loading into 
ProPub; untreated text can 
show oddities after import. 
The text should be saved 
in Ascii form - that is, with- 
out the formatting informa- 
tion used by the word-pro- 
cessing program. PrepText 
keeps basically the same 
format but makes changes 
to maintain the correct line 
format. 


Toolbox Ii 


The instructions for 
Toolbox | were stated to be 
the “shortest manual” DP 
has issued - one page. 
Toolbox Il has two pages 
so, by DP standards, it too 
is short. This second disk 
contains 38 more _HDF 
founts, 6 _QLS founts 
(which are not of quite the 
same high quality), and 4 
.FND founts. There are 
three utility programs - 
PPCompressor, PPPSaver 
and QWConverter. 

PPCompressor is a 
space-saver for ProPub 
page files. The stated size 
range for standard page 
files is 28,800 to 320,000 
bytes, and it is easy to fill a 
few disks. Apart from com- 
pressing the files, this pro- 
gram can put them onto 
another device, thereby 
performing a back-up func- 
tion. As ProPub cannot 
load compressed files, 


PPCompressor has an 
expand function, too. 

A sample compressed 
file is supplied, and the 
user can expand it with 
PPCompressor and check 
it with PPPSaver. This pro- 
gram enables part of a 
ProPub page to be saved, 
for use in graphics pro- 
grams or with SuperBasic. 

The third program gets 
its name from Qwriter Il. 
Founts from that program 
can be converted to 
ProPub _HDF form by 
QWConverter; they can 
also be enlarged with 
another DP program, Font 
Enlarger. The fount files 
must have the suffix _FND, 
but Qwriter Il itself has a 
converter, to change _FNT 
files to _FND. 

All three programs can 
be either EXEC-ed or 
loaded as SuperBasic 
extensions. In the second 
case, they are activated 
simply by typing (for exam- 
ple) PPCOMP ENTER, That 
is, the file PPCOMPRES- 
SOR can be handled in 
these ways: 


EXEC_W “flp1_PPCOM- 
PRESSOR" 


or 


base=RESPR(50*512):LB 
YTES “flp1_PPCOMPRES- 
SOR’ base:CALL base 


Minerva users can run 
these programs on the 
second screen. 


In Use 


One of the standard 
sample files with ProPub is 
called DEMO_PAGE, and 
its normal size is 96018. 
After treatment with 
PPCompressor, the size 
dropped to 50582 bytes, 
roughly 53% of the initial 
size. The compression 
operation took one sec- 
ond! Expanding the com- 
pressed file brought it back 
to its full size, in slightly 
longer time. The program 
misleadingly stated that the 
operation had been a fur- 


ther “compress”; in fact, try- 
ing a further compression 
operation produced no 
change in file size, so the 
initial pass looks to be fully 
effective. 

The expanded file was 
looked at with PPPSaver. It 
came up on the screen 
quickly and correctly, but 
without the menu that the 
instructions state should 
be displayed. That created 
no problem, as you can fol- 
low the written instructions 
for positioning the page, 
then press Space to indi- 
cate that you have selected 
the area you want. The pro- 
gram creates 32 KB files, 
and that clearly means you 
can select only a full 
screen for saving. The save 
process took a second or 
two. Escaping from the pro- 
gram was not a clean 
process, as the image of 
the expanded page stayed 
on the screen. 

Both the compressed 
and expanded page, and 


the saved part of that page, 
loaded into ProPub proper- 
ly. DTP is space-hungvy. If 
you can save space of this 
order, it will Save you 
money in disk costs; files 
you value should have at 
least one back-up copy, so 
the saving is two-fold. 


Conclusion 


With programs such as 
these there is no question 
of comparing them with 
competitive products and 
deciding which is the best 
to buy. For the most part, 
there is no third-party com- 
petition in the QL world. |f 
you are a serious ProPub 
user, there will be some- 
thing of interest here, and it 
is simply a question of 
whether or not your budget 
runs to the purchase price 
at the time. We are into the 
Christmas season now, 
and you might use a few 
extra founts to decorate the 
tree... 


AIR GW 


Teorssase (EEG) ~=—OW WA. Richardson & Co. 
SINCLAIR OL PRICE LIST al 
MARCH *93 All Prices Include 17.5% VAT 


NEW MONITOR £50 CHEAPER 


| QL Computers } 


ISCOMPLETE QL Computer, PSU, T.V. Lead, PSION V2.35 Sottware (Woed Processor, Spreadsheet, 
a Dalabase & Business Graphics). aoe JS £120 
Free obo yoats membemhip ts QUANTA, the indepeadaat QL. User Group wrth over 400 
free Libcary programs, Newsletters & HE“P. 6 MONTES WARRANTY, WITH DAROM £100.00 
TH § 3 0’ 9 if, ~ s Bikes) 
BACKUPOLS QL & PSU only, JS.£80 IMCS (Part axchange allowance £15 if required) 


[Accessorics | 


* NOTE: EXTERNAL (SER2) 3 BUTTON MOUSE AND SOPTWARB he 
WITH EXTRA FUNCTIONS. NOW HERMES COMPATIOLE 


PC KEYBOARD INTERPACE, INTERNAL FITTING, POR FITTING 102 KEY KEYBOARD £ 75.00 
PC KEYBOARD, UK version, 102 kay (AT) £0.00 
PC KEYBOARD INTERPACE and KEYBOARD (INCLUDES FREB JOYSTICK OR PSU) £95.00 
CASB and LEAD for EXTERNAL FITTING of Keyboard Interface £ 14.00 
JOYSTICK with QL lead (no interface required) 2 10.00 
%® QL MOUSP, 3 Ratton, Software controlled, externally mounted, simply fits In SER2_ £45 CORDLESS MOUSF_& 55.00 


; : THE UNIVERSAL DRIVES ARB ALSO SUITABLE FOR ACORN BBC, ATARI ST, 
Disk Drives] [Xiah SracriUMs, IBM AMSTRAD AND OTMin Pe COM Ma ES 
Universal 3.5° IM disk drive, cased with PSU and free QL lasd £70.00 2. Units for dual drive £120.00 
Universal 3.5° 2Mb disk drive, as above but 2h capacity £90.00 2 Units for dual drive = £170.00 
3.5" IM Uncased dlsk drive 2 25.00 


£ 49.00 
£10.00 POWER SUPPLY POR UNCASED DRIVES £ 6.00 


Parallel Printers ] NEW RANGE MBTAL CASBS POR UNCASED DRIVES £ 600 


SAMSUNG SPO93 60 Col, 300 cpa, $0 NLQ, 3K Print Bulfer, ‘Tractor 
PRINTER, 24 200 spe, 50 NLG, MOK Babi, Eepon LORSAVIEM Competibhe 


GL LEAD POR SHRIAL PRINTEES 10 CANNON BJ10 EX 


PHILIPS 14* HIGH RES COLOUR EGA 31 DOT PITCH, FULL 85 COL 
‘WITH AMBER OR GREEN TEXT FEATURE, IDEAL FOR WORD 140 
PROCESSING, RECONDITIONED, 90 DAY WARRANTY. 

OK FOR PC AND QL SELF SENSING AND MANY EXT/L CONTROLS. 


* a > id 

Microdrive Cartridges and Sparesy MONO OPTION” WITH 

4 New Cartridges in a wallet £ 10,00 a carts for sedocmatiing io 2 wallets & 15.00 
Plasto Storage filing box including 20 mew cartridges ae as £ 45,00 
QL Pelom Software S$ Includes Quill, Abecus, Archive, and Easel IN WALLET 2 18.00 
QL Psion Software Separate programs £ 10.00 
QL power Supply Unit £ 10.00 Membrane (and instructions) £ 9.00 
Tv 2 3.00 QL Top & Bottom Case £ 5.00 
Ce = ZX 8301 £ 6.00 ZX 82 £ 3.00 8049 GPC) £ 3.00 MC 1377 £ 3.00 

MC 68008 12.00 
QLSFRVICR MANUALS & CIRCUIT. 


aso SAE FOR FURTHER DETAILS 


a Payment farms! Delivery: 
=< CWO, Access, VISA et cetera Carrlage - £9 en, Wes 
[Ee | 


YOUR Ql 


Product mubject w availability, E&OE 
TEL: 0753 888866 FAX: 0753 887149 


GOLLEGTION 


Worl 


Now you can keep your Sinclair QL 
d riseaaines safe and clean. No 
more dog-eared covers or missing 
copies . . . You can protect your 
magazines in this high acell 
specially-created binder. This Sinclair 
QL World binder will comfortably hold 
a complete year’s issues of your 
favourite Sinclair magazine. It is a high 


ity, 


quality product, British-made and | 
comes with full binding instructions. It is 
manufactured in a rich, deep blue with 
genuine gold blocked lettering. 

Enhance your Sinclair QL World 
Magazine collection now for only 
£5.95 (inc.P&P!) Send for one today! 
The QL World binders also make an 
ideal gift for other Sinclair users too! 


oe oe ee ee eee ee ee ee ee ee eee ee ee ee ee ee ee ee ee ee eee ee eee ee eee ee ee eee ee ee 


1 TO: QL WORLD, THE BLUE BARN, WOOTTON, WOODSTOCK, OXON. OX7 1HA 
I Please send me L_] QL World binders — | enclose £6.95 for each binder including VAT. postage & packing. 
| Readers outside the UK and Eire please add £1.95 for surface overseas mail. 


| Please make cheques payable to ARC WID LTD... 


J} ACCESS []VISALJaccount:| ae | - we i | | a Expiry date:...............4 

, = | a i an 7 

BETS acsuaciscsccveteaasacdensseersanconersecciesaotonesorsennectnesacmnctaass nenseaiar satin ttn cx sateaifa vaste ooh seats Sisal cuaivei Tedisco | 

ROSA cabal iO by OT Oe ek Olan Cola Nal eB ar aereta eal J 
3 Sait oss aide Ca daasbsadsaansesnentne ste aebanetts POSTCODE s c.schsncecetsiedscdussveoess earaiecsd GIG PUG scccsiicuinnsidecadiicl Sveriges inaessael 
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Dilwyn Jones Computing 


41 BRO EMRYS, TAL-Y-BONT, BANGOR, 
GWYNEDD, LLS7 3 YT, GREAT BRITAIN 
FAX/TEL: (0248) 354023 


DATABASE SOFTWARE GENEALOGY SCREEN DUMPS 


COCKTAILS WAITERE 10 00 GENEALOGIST § scsstccccisnsinimsisivestsienossesnsonciemneeed £60.00 SIDEWINDER PLUS cocsessssossssssesvsserssvorervcvsescesnee £24.95 
DATA DESIGN 3. new pointer driven version 
DATA DESIGN API £20.00 Upgrade 21d EatttO srmmmarnenncesnnnnnmnmnnine£33.00 SPREADSHEET PRINTING 
DBEASY ..eeccccces £15.00 upgrade other versions, ask 
DBPROGS ....... £15.00 GENEALOGIST 2ND EDITION .....+ssssssssssmene wr£ 30,00 nee ee ae ee oe 
FLASHBACK ....... £25.00 BUDGET 128K GENEALOGIST (Usucsssssenemne£12.00 9 49° 7 0 “mmmnmaucuntcnunasenGes 
FLASHBACK SE ..... £40.00 
SUPER DISK INDEXER ncovsneoeoneronsnss £12.00 GRAPHICS SUNDRIES 

IMAGE-D ) veeesevtessessssercrenee £10.00 53 DSDD DIES Gh cece £0.40 

IMAGE PROCESSOR ... £15.00 3 5” DSHD DISKS each sso wne£ 0,70 
DIP & CLIPART LINE DESIGN ..... £100.00 3 5” DISK LABELS (roll 100) -. wer 2,00 
PAGE DESIGNER 3 .esssestessscssnstsrssetentstcersene £40.00 PAINTER vceronesson £25.00 3 5” LABELS (printer 10) serenemsenranerinenanmnrb de SD 
Available at last! PICTUREMASTER ... Cs wveee£ 15.00 ADDRESS LABELS {roll 100) .... enemies £2.00 

PICTUREMASTER PLUS......... oiliawiessieace ZOOO MICRODRIVE CARTRIDGES... 

RACING estes intansmbe OUe MDV LABELS (roll 100) «0... 

QUICK MANDELBROT 3 (U) .... ssiencnre LO MOUSE MAT .W..ssssessosssves 

SCREEN COMPRESSION ..ecssssosssssnsesassseerensonern£ 10,00 3.5” DISK DIVIDERS (20) sosussssssserve 

SCREEN SNATCHER (U) ssiseosssssssnerenseensseersee sw 10.00 Add £0 50 postage for labels or mouse 

SIMPLE VIDEO TITLES .. co oceans bo £5.00 mat if only ordering those, or £2 50 postage 

TRANS 24 (U)  crosesenearerncveessesenee £10.00 for disks or disk box divider sets 


; HARDWARE 
4MATTER & LOCKSMITHE wonrn£ 23,50 MICRO PROCESS CONTROLLER 
LOCKSMITHE (Up.rosossscsrsseseees new redesigned versiOwn csseucnsnewsessunsssunsesneenuss £64.50 


NETWORK PROVER .... 
QPOWER REGULATOR 
(unsuitable Gold Card) 
SERMOUGE oiietenc eon coe sete arene OU 
VOICE ANALYSER-New! 
Ask for details and price 
Add £2 50 postage for MPC, 
SERMOUSE AND VOICE ANALYSER 

OTHER SOFTWARE 
MAGAZINES HOME BUDGET (U) secscossossssssmenssnsonnneersersssnerssnserenes £20.00 
REVIEW possi acest 
QL TECHNICAL REVIEW ... 


issues 1-8 available 
QL ADVENTURER'S FORUM cessor £1.75 

GAMES & LEISURE Issues 1-9 available OTP gacaiec ie Asc asic eonte carnal £2995 
at Ite REVIEW secs SOI <a ote 
pana tegltnaas SCREEN ECONOMISER (U) 


(UK prices only shown) 


VISION MINER PEGS ssssciussissiosacisssscsascoisvnsicioisiie 


CALL OR WRITE FOR A FREE COPY OF 
OUR QL SOFTWARE CATALOGUE 
DETAILING AROUND 100 QL PRODUCTS 


LABELLING BUDGET QLIBERATOR (U) £25. PLEASE NOTE: (U) ABOVE MEANS THAT 
ADDRESS BOOK&LABEL PRINTER eveooescersesene £15.00 QLOAD AND QREF (U) «2.00. . THE SOFTWARE IS SUITABLE FOR USE 
| SUPER DISK LABELLER ececsecssersntnsnansninmenerd 10,00 SLEDIT EDITOR  sicserinsaccomntnianinriicnenmansie aneen 20,00 ON A 128K OL 


TERMS: POSTAGE-software sent post free to UK, overseas add £1 00 per program (maximum £3 00) Floppy disks, SERmouse, etc add £2 50 postage (see 
above) PAYMENT - IN UK currency (pounds sterling) only, please Valid methods of payment are cheque drawn on UK branch of bank or building 
society, Eurocheque, Postal Order, cash (send by registered post) or by credit card - Visa, Access, Mastercard and Eurocard accepted Please make cheques 
etc payable to DILWYN JONES COMPUTING Minimum order value £5 00 (due to bank charges) Goods remain property of Dilwyn Jones Computing 
until paid for in fill Orders normally sent out within a few days of receipt, we will attempt to advise if any delay anticipated due to stock problems Orders 
can be accepted by telephone jf paid for with credit card Orders paid with credit card can only be sent to cardholder's address under card company rules 


FAX - We now have a Fax machine on our usual number (0248) 354023 


